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 */ 373deb3ec6SMatthias Ringwald 383deb3ec6SMatthias Ringwald #include <stdio.h> 393deb3ec6SMatthias Ringwald #include <string.h> 403deb3ec6SMatthias Ringwald #include <inttypes.h> 413deb3ec6SMatthias Ringwald 423edc84c5SMatthias Ringwald #include "ble/le_device_db.h" 4359c6af15SMatthias Ringwald #include "ble/core.h" 443edc84c5SMatthias Ringwald #include "ble/sm.h" 450e2df43fSMatthias Ringwald #include "btstack_debug.h" 460e2df43fSMatthias Ringwald #include "btstack_event.h" 470e2df43fSMatthias Ringwald #include "btstack_linked_list.h" 480e2df43fSMatthias Ringwald #include "btstack_memory.h" 49f7a05cdaSMatthias Ringwald #include "gap.h" 500e2df43fSMatthias Ringwald #include "hci.h" 510e2df43fSMatthias Ringwald #include "l2cap.h" 523deb3ec6SMatthias Ringwald 53e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 54e53be891SMatthias Ringwald // TODO: remove software AES 55e53be891SMatthias Ringwald #include "rijndael.h" 56e53be891SMatthias Ringwald #endif 57e53be891SMatthias Ringwald 5827c32905SMatthias Ringwald #if defined(ENABLE_LE_SECURE_CONNECTIONS) && !defined(HAVE_HCI_CONTROLLER_DHKEY_SUPPORT) 5927c32905SMatthias Ringwald #define USE_MBEDTLS_FOR_ECDH 6027c32905SMatthias Ringwald #endif 6127c32905SMatthias Ringwald 6227c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls 6327c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 6427c32905SMatthias Ringwald #if !defined(MBEDTLS_CONFIG_FILE) 6527c32905SMatthias Ringwald #include "mbedtls/config.h" 6627c32905SMatthias Ringwald #else 6727c32905SMatthias Ringwald #include MBEDTLS_CONFIG_FILE 6827c32905SMatthias Ringwald #endif 6927c32905SMatthias Ringwald #if defined(MBEDTLS_PLATFORM_C) 7027c32905SMatthias Ringwald #include "mbedtls/platform.h" 7127c32905SMatthias Ringwald #else 7227c32905SMatthias Ringwald #include <stdio.h> 7327c32905SMatthias Ringwald #define mbedtls_printf printf 7427c32905SMatthias Ringwald #endif 7527c32905SMatthias Ringwald #include "mbedtls/ecp.h" 7627c32905SMatthias Ringwald #endif 7727c32905SMatthias Ringwald 783deb3ec6SMatthias Ringwald // 793deb3ec6SMatthias Ringwald // SM internal types and globals 803deb3ec6SMatthias Ringwald // 813deb3ec6SMatthias Ringwald 823deb3ec6SMatthias Ringwald typedef enum { 833deb3ec6SMatthias Ringwald DKG_W4_WORKING, 843deb3ec6SMatthias Ringwald DKG_CALC_IRK, 853deb3ec6SMatthias Ringwald DKG_W4_IRK, 863deb3ec6SMatthias Ringwald DKG_CALC_DHK, 873deb3ec6SMatthias Ringwald DKG_W4_DHK, 883deb3ec6SMatthias Ringwald DKG_READY 893deb3ec6SMatthias Ringwald } derived_key_generation_t; 903deb3ec6SMatthias Ringwald 913deb3ec6SMatthias Ringwald typedef enum { 923deb3ec6SMatthias Ringwald RAU_W4_WORKING, 933deb3ec6SMatthias Ringwald RAU_IDLE, 943deb3ec6SMatthias Ringwald RAU_GET_RANDOM, 953deb3ec6SMatthias Ringwald RAU_W4_RANDOM, 963deb3ec6SMatthias Ringwald RAU_GET_ENC, 973deb3ec6SMatthias Ringwald RAU_W4_ENC, 983deb3ec6SMatthias Ringwald RAU_SET_ADDRESS, 993deb3ec6SMatthias Ringwald } random_address_update_t; 1003deb3ec6SMatthias Ringwald 1013deb3ec6SMatthias Ringwald typedef enum { 1023deb3ec6SMatthias Ringwald CMAC_IDLE, 1033deb3ec6SMatthias Ringwald CMAC_CALC_SUBKEYS, 1043deb3ec6SMatthias Ringwald CMAC_W4_SUBKEYS, 1053deb3ec6SMatthias Ringwald CMAC_CALC_MI, 1063deb3ec6SMatthias Ringwald CMAC_W4_MI, 1073deb3ec6SMatthias Ringwald CMAC_CALC_MLAST, 1083deb3ec6SMatthias Ringwald CMAC_W4_MLAST 1093deb3ec6SMatthias Ringwald } cmac_state_t; 1103deb3ec6SMatthias Ringwald 1113deb3ec6SMatthias Ringwald typedef enum { 1123deb3ec6SMatthias Ringwald JUST_WORKS, 11327c32905SMatthias Ringwald PK_RESP_INPUT, // Initiator displays PK, responder inputs PK 11427c32905SMatthias Ringwald PK_INIT_INPUT, // Responder displays PK, initiator inputs PK 1153deb3ec6SMatthias Ringwald OK_BOTH_INPUT, // Only input on both, both input PK 11627c32905SMatthias Ringwald NK_BOTH_INPUT, // Only numerical compparison (yes/no) on on both sides 1173deb3ec6SMatthias Ringwald OOB // OOB available on both sides 1183deb3ec6SMatthias Ringwald } stk_generation_method_t; 1193deb3ec6SMatthias Ringwald 1203deb3ec6SMatthias Ringwald typedef enum { 1213deb3ec6SMatthias Ringwald SM_USER_RESPONSE_IDLE, 1223deb3ec6SMatthias Ringwald SM_USER_RESPONSE_PENDING, 1233deb3ec6SMatthias Ringwald SM_USER_RESPONSE_CONFIRM, 1243deb3ec6SMatthias Ringwald SM_USER_RESPONSE_PASSKEY, 1253deb3ec6SMatthias Ringwald SM_USER_RESPONSE_DECLINE 1263deb3ec6SMatthias Ringwald } sm_user_response_t; 1273deb3ec6SMatthias Ringwald 1283deb3ec6SMatthias Ringwald typedef enum { 1293deb3ec6SMatthias Ringwald SM_AES128_IDLE, 1303deb3ec6SMatthias Ringwald SM_AES128_ACTIVE 1313deb3ec6SMatthias Ringwald } sm_aes128_state_t; 1323deb3ec6SMatthias Ringwald 1333deb3ec6SMatthias Ringwald typedef enum { 1343deb3ec6SMatthias Ringwald ADDRESS_RESOLUTION_IDLE, 1353deb3ec6SMatthias Ringwald ADDRESS_RESOLUTION_GENERAL, 1363deb3ec6SMatthias Ringwald ADDRESS_RESOLUTION_FOR_CONNECTION, 1373deb3ec6SMatthias Ringwald } address_resolution_mode_t; 1383deb3ec6SMatthias Ringwald 1393deb3ec6SMatthias Ringwald typedef enum { 1403deb3ec6SMatthias Ringwald ADDRESS_RESOLUTION_SUCEEDED, 1413deb3ec6SMatthias Ringwald ADDRESS_RESOLUTION_FAILED, 1423deb3ec6SMatthias Ringwald } address_resolution_event_t; 1433deb3ec6SMatthias Ringwald // 1443deb3ec6SMatthias Ringwald // GLOBAL DATA 1453deb3ec6SMatthias Ringwald // 1463deb3ec6SMatthias Ringwald 1473deb3ec6SMatthias Ringwald static uint8_t test_use_fixed_local_csrk; 1483deb3ec6SMatthias Ringwald 1493deb3ec6SMatthias Ringwald // configuration 1503deb3ec6SMatthias Ringwald static uint8_t sm_accepted_stk_generation_methods; 1513deb3ec6SMatthias Ringwald static uint8_t sm_max_encryption_key_size; 1523deb3ec6SMatthias Ringwald static uint8_t sm_min_encryption_key_size; 1533deb3ec6SMatthias Ringwald static uint8_t sm_auth_req = 0; 1543deb3ec6SMatthias Ringwald static uint8_t sm_io_capabilities = IO_CAPABILITY_NO_INPUT_NO_OUTPUT; 1553deb3ec6SMatthias Ringwald static uint8_t sm_slave_request_security; 1563deb3ec6SMatthias Ringwald 1573deb3ec6SMatthias Ringwald // Security Manager Master Keys, please use sm_set_er(er) and sm_set_ir(ir) with your own 128 bit random values 1583deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_er; 1593deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_ir; 1603deb3ec6SMatthias Ringwald 1613deb3ec6SMatthias Ringwald // derived from sm_persistent_ir 1623deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_dhk; 1633deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_irk; 1643deb3ec6SMatthias Ringwald static uint8_t sm_persistent_irk_ready = 0; // used for testing 1653deb3ec6SMatthias Ringwald static derived_key_generation_t dkg_state; 1663deb3ec6SMatthias Ringwald 1673deb3ec6SMatthias Ringwald // derived from sm_persistent_er 1683deb3ec6SMatthias Ringwald // .. 1693deb3ec6SMatthias Ringwald 1703deb3ec6SMatthias Ringwald // random address update 1713deb3ec6SMatthias Ringwald static random_address_update_t rau_state; 1723deb3ec6SMatthias Ringwald static bd_addr_t sm_random_address; 1733deb3ec6SMatthias Ringwald 174514d35fcSMatthias Ringwald // CMAC Calculation: General 1753deb3ec6SMatthias Ringwald static cmac_state_t sm_cmac_state; 1763deb3ec6SMatthias Ringwald static uint16_t sm_cmac_message_len; 177514d35fcSMatthias Ringwald static sm_key_t sm_cmac_k; 1783deb3ec6SMatthias Ringwald static sm_key_t sm_cmac_x; 179514d35fcSMatthias Ringwald static sm_key_t sm_cmac_m_last; 1803deb3ec6SMatthias Ringwald static uint8_t sm_cmac_block_current; 1813deb3ec6SMatthias Ringwald static uint8_t sm_cmac_block_count; 182514d35fcSMatthias Ringwald static uint8_t (*sm_cmac_get_byte)(uint16_t offset); 183514d35fcSMatthias Ringwald static void (*sm_cmac_done_handler)(uint8_t * hash); 184514d35fcSMatthias Ringwald 185514d35fcSMatthias Ringwald // CMAC for ATT Signed Writes 186514d35fcSMatthias Ringwald static uint8_t sm_cmac_header[3]; 187aec94140SMatthias Ringwald static const uint8_t * sm_cmac_message; 188514d35fcSMatthias Ringwald static uint8_t sm_cmac_sign_counter[4]; 189514d35fcSMatthias Ringwald 190514d35fcSMatthias Ringwald // CMAC for Secure Connection functions 191514d35fcSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 192aec94140SMatthias Ringwald static sm_connection_t * sm_cmac_connection; 193514d35fcSMatthias Ringwald static uint8_t sm_cmac_sc_buffer[80]; 194514d35fcSMatthias Ringwald #endif 1953deb3ec6SMatthias Ringwald 1963deb3ec6SMatthias Ringwald // resolvable private address lookup / CSRK calculation 1973deb3ec6SMatthias Ringwald static int sm_address_resolution_test; 1983deb3ec6SMatthias Ringwald static int sm_address_resolution_ah_calculation_active; 1993deb3ec6SMatthias Ringwald static uint8_t sm_address_resolution_addr_type; 2003deb3ec6SMatthias Ringwald static bd_addr_t sm_address_resolution_address; 2013deb3ec6SMatthias Ringwald static void * sm_address_resolution_context; 2023deb3ec6SMatthias Ringwald static address_resolution_mode_t sm_address_resolution_mode; 2038f2a52f4SMatthias Ringwald static btstack_linked_list_t sm_address_resolution_general_queue; 2043deb3ec6SMatthias Ringwald 2053deb3ec6SMatthias Ringwald // aes128 crypto engine. store current sm_connection_t in sm_aes128_context 2063deb3ec6SMatthias Ringwald static sm_aes128_state_t sm_aes128_state; 2073deb3ec6SMatthias Ringwald static void * sm_aes128_context; 2083deb3ec6SMatthias Ringwald 2093deb3ec6SMatthias Ringwald // random engine. store context (ususally sm_connection_t) 2103deb3ec6SMatthias Ringwald static void * sm_random_context; 2113deb3ec6SMatthias Ringwald 212e03e489aSMatthias Ringwald // to receive hci events 213e03e489aSMatthias Ringwald static btstack_packet_callback_registration_t hci_event_callback_registration; 214e03e489aSMatthias Ringwald 21589a78d34SMatthias Ringwald /* to dispatch sm event */ 21689a78d34SMatthias Ringwald static btstack_linked_list_t sm_event_handlers; 21789a78d34SMatthias Ringwald 21827c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls 21927c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 22027c32905SMatthias Ringwald mbedtls_ecp_keypair le_keypair; 22127c32905SMatthias Ringwald #endif 22227c32905SMatthias Ringwald 2233deb3ec6SMatthias Ringwald // 2243deb3ec6SMatthias Ringwald // Volume 3, Part H, Chapter 24 2253deb3ec6SMatthias Ringwald // "Security shall be initiated by the Security Manager in the device in the master role. 2263deb3ec6SMatthias Ringwald // The device in the slave role shall be the responding device." 2273deb3ec6SMatthias Ringwald // -> master := initiator, slave := responder 2283deb3ec6SMatthias Ringwald // 2293deb3ec6SMatthias Ringwald 2303deb3ec6SMatthias Ringwald // data needed for security setup 2313deb3ec6SMatthias Ringwald typedef struct sm_setup_context { 2323deb3ec6SMatthias Ringwald 233ec820d77SMatthias Ringwald btstack_timer_source_t sm_timeout; 2343deb3ec6SMatthias Ringwald 2353deb3ec6SMatthias Ringwald // used in all phases 2363deb3ec6SMatthias Ringwald uint8_t sm_pairing_failed_reason; 2373deb3ec6SMatthias Ringwald 2383deb3ec6SMatthias Ringwald // user response, (Phase 1 and/or 2) 2393deb3ec6SMatthias Ringwald uint8_t sm_user_response; 2403deb3ec6SMatthias Ringwald 2413deb3ec6SMatthias Ringwald // defines which keys will be send after connection is encrypted - calculated during Phase 1, used Phase 3 2423deb3ec6SMatthias Ringwald int sm_key_distribution_send_set; 2433deb3ec6SMatthias Ringwald int sm_key_distribution_received_set; 2443deb3ec6SMatthias Ringwald 2453deb3ec6SMatthias Ringwald // Phase 2 (Pairing over SMP) 2463deb3ec6SMatthias Ringwald stk_generation_method_t sm_stk_generation_method; 2473deb3ec6SMatthias Ringwald sm_key_t sm_tk; 24827c32905SMatthias Ringwald uint8_t sm_use_secure_connections; 2493deb3ec6SMatthias Ringwald 2503deb3ec6SMatthias Ringwald sm_key_t sm_c1_t3_value; // c1 calculation 2513deb3ec6SMatthias Ringwald sm_pairing_packet_t sm_m_preq; // pairing request - needed only for c1 2523deb3ec6SMatthias Ringwald sm_pairing_packet_t sm_s_pres; // pairing response - needed only for c1 2533deb3ec6SMatthias Ringwald sm_key_t sm_local_random; 2543deb3ec6SMatthias Ringwald sm_key_t sm_local_confirm; 2553deb3ec6SMatthias Ringwald sm_key_t sm_peer_random; 2563deb3ec6SMatthias Ringwald sm_key_t sm_peer_confirm; 2573deb3ec6SMatthias Ringwald uint8_t sm_m_addr_type; // address and type can be removed 2583deb3ec6SMatthias Ringwald uint8_t sm_s_addr_type; // '' 2593deb3ec6SMatthias Ringwald bd_addr_t sm_m_address; // '' 2603deb3ec6SMatthias Ringwald bd_addr_t sm_s_address; // '' 2613deb3ec6SMatthias Ringwald sm_key_t sm_ltk; 2623deb3ec6SMatthias Ringwald 263e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 26427c32905SMatthias Ringwald uint8_t sm_peer_qx[32]; 26527c32905SMatthias Ringwald uint8_t sm_peer_qy[32]; 266446a8c36SMatthias Ringwald sm_key_t sm_peer_nonce; // might be combined with sm_peer_random 267446a8c36SMatthias Ringwald sm_key_t sm_local_nonce; // might be combined with sm_local_random 268e53be891SMatthias Ringwald sm_key_t sm_peer_dhkey_check; 269e53be891SMatthias Ringwald sm_key_t sm_local_dhkey_check; 270446a8c36SMatthias Ringwald sm_key_t sm_ra; 271446a8c36SMatthias Ringwald sm_key_t sm_rb; 272a9f29768SMatthias Ringwald sm_key_t sm_mackey; 27345a61d50SMatthias Ringwald uint8_t sm_passkey_bit; 274e53be891SMatthias Ringwald #endif 27527c32905SMatthias Ringwald 2763deb3ec6SMatthias Ringwald // Phase 3 2773deb3ec6SMatthias Ringwald 2783deb3ec6SMatthias Ringwald // key distribution, we generate 2793deb3ec6SMatthias Ringwald uint16_t sm_local_y; 2803deb3ec6SMatthias Ringwald uint16_t sm_local_div; 2813deb3ec6SMatthias Ringwald uint16_t sm_local_ediv; 2823deb3ec6SMatthias Ringwald uint8_t sm_local_rand[8]; 2833deb3ec6SMatthias Ringwald sm_key_t sm_local_ltk; 2843deb3ec6SMatthias Ringwald sm_key_t sm_local_csrk; 2853deb3ec6SMatthias Ringwald sm_key_t sm_local_irk; 2863deb3ec6SMatthias Ringwald // sm_local_address/addr_type not needed 2873deb3ec6SMatthias Ringwald 2883deb3ec6SMatthias Ringwald // key distribution, received from peer 2893deb3ec6SMatthias Ringwald uint16_t sm_peer_y; 2903deb3ec6SMatthias Ringwald uint16_t sm_peer_div; 2913deb3ec6SMatthias Ringwald uint16_t sm_peer_ediv; 2923deb3ec6SMatthias Ringwald uint8_t sm_peer_rand[8]; 2933deb3ec6SMatthias Ringwald sm_key_t sm_peer_ltk; 2943deb3ec6SMatthias Ringwald sm_key_t sm_peer_irk; 2953deb3ec6SMatthias Ringwald sm_key_t sm_peer_csrk; 2963deb3ec6SMatthias Ringwald uint8_t sm_peer_addr_type; 2973deb3ec6SMatthias Ringwald bd_addr_t sm_peer_address; 2983deb3ec6SMatthias Ringwald 2993deb3ec6SMatthias Ringwald } sm_setup_context_t; 3003deb3ec6SMatthias Ringwald 3013deb3ec6SMatthias Ringwald // 3023deb3ec6SMatthias Ringwald static sm_setup_context_t the_setup; 3033deb3ec6SMatthias Ringwald static sm_setup_context_t * setup = &the_setup; 3043deb3ec6SMatthias Ringwald 3053deb3ec6SMatthias Ringwald // active connection - the one for which the_setup is used for 3063deb3ec6SMatthias Ringwald static uint16_t sm_active_connection = 0; 3073deb3ec6SMatthias Ringwald 3083deb3ec6SMatthias Ringwald // @returns 1 if oob data is available 3093deb3ec6SMatthias Ringwald // stores oob data in provided 16 byte buffer if not null 3103deb3ec6SMatthias Ringwald static int (*sm_get_oob_data)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data) = NULL; 3113deb3ec6SMatthias Ringwald 3123deb3ec6SMatthias Ringwald // used to notify applicationss that user interaction is neccessary, see sm_notify_t below 3133deb3ec6SMatthias Ringwald static btstack_packet_handler_t sm_client_packet_handler = NULL; 3143deb3ec6SMatthias Ringwald 3153deb3ec6SMatthias Ringwald // horizontal: initiator capabilities 3163deb3ec6SMatthias Ringwald // vertial: responder capabilities 3173deb3ec6SMatthias Ringwald static const stk_generation_method_t stk_generation_method [5] [5] = { 3183deb3ec6SMatthias Ringwald { JUST_WORKS, JUST_WORKS, PK_INIT_INPUT, JUST_WORKS, PK_INIT_INPUT }, 3193deb3ec6SMatthias Ringwald { JUST_WORKS, JUST_WORKS, PK_INIT_INPUT, JUST_WORKS, PK_INIT_INPUT }, 3203deb3ec6SMatthias Ringwald { PK_RESP_INPUT, PK_RESP_INPUT, OK_BOTH_INPUT, JUST_WORKS, PK_RESP_INPUT }, 3213deb3ec6SMatthias Ringwald { JUST_WORKS, JUST_WORKS, JUST_WORKS, JUST_WORKS, JUST_WORKS }, 3223deb3ec6SMatthias Ringwald { PK_RESP_INPUT, PK_RESP_INPUT, PK_INIT_INPUT, JUST_WORKS, PK_RESP_INPUT }, 3233deb3ec6SMatthias Ringwald }; 3243deb3ec6SMatthias Ringwald 32527c32905SMatthias Ringwald // uses numeric comparison if one side has DisplayYesNo and KeyboardDisplay combinations 32627c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 32727c32905SMatthias Ringwald static const stk_generation_method_t stk_generation_method_with_secure_connection[5][5] = { 32827c32905SMatthias Ringwald { JUST_WORKS, JUST_WORKS, PK_INIT_INPUT, JUST_WORKS, PK_INIT_INPUT }, 32927c32905SMatthias Ringwald { JUST_WORKS, NK_BOTH_INPUT, PK_INIT_INPUT, JUST_WORKS, NK_BOTH_INPUT }, 33027c32905SMatthias Ringwald { PK_RESP_INPUT, PK_RESP_INPUT, OK_BOTH_INPUT, JUST_WORKS, PK_RESP_INPUT }, 33127c32905SMatthias Ringwald { JUST_WORKS, JUST_WORKS, JUST_WORKS, JUST_WORKS, JUST_WORKS }, 33227c32905SMatthias Ringwald { PK_RESP_INPUT, NK_BOTH_INPUT, PK_INIT_INPUT, JUST_WORKS, NK_BOTH_INPUT }, 33327c32905SMatthias Ringwald }; 33427c32905SMatthias Ringwald #endif 33527c32905SMatthias Ringwald 3363deb3ec6SMatthias Ringwald static void sm_run(void); 337711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle); 338711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle); 3393deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other); 3403deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void); 341e53be891SMatthias Ringwald static void sm_shift_left_by_one_bit_inplace(int len, uint8_t * data); 3423deb3ec6SMatthias Ringwald 3433deb3ec6SMatthias Ringwald static void log_info_hex16(const char * name, uint16_t value){ 3443deb3ec6SMatthias Ringwald log_info("%-6s 0x%04x", name, value); 3453deb3ec6SMatthias Ringwald } 3463deb3ec6SMatthias Ringwald 3473deb3ec6SMatthias Ringwald // @returns 1 if all bytes are 0 3483deb3ec6SMatthias Ringwald static int sm_is_null_random(uint8_t random[8]){ 3493deb3ec6SMatthias Ringwald int i; 3503deb3ec6SMatthias Ringwald for (i=0; i < 8 ; i++){ 3513deb3ec6SMatthias Ringwald if (random[i]) return 0; 3523deb3ec6SMatthias Ringwald } 3533deb3ec6SMatthias Ringwald return 1; 3543deb3ec6SMatthias Ringwald } 3553deb3ec6SMatthias Ringwald 3563deb3ec6SMatthias Ringwald // Key utils 3573deb3ec6SMatthias Ringwald static void sm_reset_tk(void){ 3583deb3ec6SMatthias Ringwald int i; 3593deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 3603deb3ec6SMatthias Ringwald setup->sm_tk[i] = 0; 3613deb3ec6SMatthias Ringwald } 3623deb3ec6SMatthias Ringwald } 3633deb3ec6SMatthias Ringwald 3643deb3ec6SMatthias Ringwald // "For example, if a 128-bit encryption key is 0x123456789ABCDEF0123456789ABCDEF0 3653deb3ec6SMatthias Ringwald // and it is reduced to 7 octets (56 bits), then the resulting key is 0x0000000000000000003456789ABCDEF0."" 3663deb3ec6SMatthias Ringwald static void sm_truncate_key(sm_key_t key, int max_encryption_size){ 3673deb3ec6SMatthias Ringwald int i; 3683deb3ec6SMatthias Ringwald for (i = max_encryption_size ; i < 16 ; i++){ 3693deb3ec6SMatthias Ringwald key[15-i] = 0; 3703deb3ec6SMatthias Ringwald } 3713deb3ec6SMatthias Ringwald } 3723deb3ec6SMatthias Ringwald 3733deb3ec6SMatthias Ringwald // SMP Timeout implementation 3743deb3ec6SMatthias Ringwald 3753deb3ec6SMatthias Ringwald // Upon transmission of the Pairing Request command or reception of the Pairing Request command, 3763deb3ec6SMatthias Ringwald // the Security Manager Timer shall be reset and started. 3773deb3ec6SMatthias Ringwald // 3783deb3ec6SMatthias Ringwald // The Security Manager Timer shall be reset when an L2CAP SMP command is queued for transmission. 3793deb3ec6SMatthias Ringwald // 3803deb3ec6SMatthias Ringwald // If the Security Manager Timer reaches 30 seconds, the procedure shall be considered to have failed, 3813deb3ec6SMatthias Ringwald // and the local higher layer shall be notified. No further SMP commands shall be sent over the L2CAP 3823deb3ec6SMatthias Ringwald // Security Manager Channel. A new SM procedure shall only be performed when a new physical link has been 3833deb3ec6SMatthias Ringwald // established. 3843deb3ec6SMatthias Ringwald 385ec820d77SMatthias Ringwald static void sm_timeout_handler(btstack_timer_source_t * timer){ 3863deb3ec6SMatthias Ringwald log_info("SM timeout"); 387c5b64319SMatthias Ringwald sm_connection_t * sm_conn = (sm_connection_t*) btstack_run_loop_get_timer_context(timer); 3883deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_GENERAL_TIMEOUT; 3893deb3ec6SMatthias Ringwald sm_done_for_handle(sm_conn->sm_handle); 3903deb3ec6SMatthias Ringwald 3913deb3ec6SMatthias Ringwald // trigger handling of next ready connection 3923deb3ec6SMatthias Ringwald sm_run(); 3933deb3ec6SMatthias Ringwald } 3943deb3ec6SMatthias Ringwald static void sm_timeout_start(sm_connection_t * sm_conn){ 395528a4a3bSMatthias Ringwald btstack_run_loop_remove_timer(&setup->sm_timeout); 39691a977e8SMatthias Ringwald btstack_run_loop_set_timer_context(&setup->sm_timeout, sm_conn); 397528a4a3bSMatthias Ringwald btstack_run_loop_set_timer_handler(&setup->sm_timeout, sm_timeout_handler); 398528a4a3bSMatthias Ringwald btstack_run_loop_set_timer(&setup->sm_timeout, 30000); // 30 seconds sm timeout 399528a4a3bSMatthias Ringwald btstack_run_loop_add_timer(&setup->sm_timeout); 4003deb3ec6SMatthias Ringwald } 4013deb3ec6SMatthias Ringwald static void sm_timeout_stop(void){ 402528a4a3bSMatthias Ringwald btstack_run_loop_remove_timer(&setup->sm_timeout); 4033deb3ec6SMatthias Ringwald } 4043deb3ec6SMatthias Ringwald static void sm_timeout_reset(sm_connection_t * sm_conn){ 4053deb3ec6SMatthias Ringwald sm_timeout_stop(); 4063deb3ec6SMatthias Ringwald sm_timeout_start(sm_conn); 4073deb3ec6SMatthias Ringwald } 4083deb3ec6SMatthias Ringwald 4093deb3ec6SMatthias Ringwald // end of sm timeout 4103deb3ec6SMatthias Ringwald 4113deb3ec6SMatthias Ringwald // GAP Random Address updates 4123deb3ec6SMatthias Ringwald static gap_random_address_type_t gap_random_adress_type; 413ec820d77SMatthias Ringwald static btstack_timer_source_t gap_random_address_update_timer; 4143deb3ec6SMatthias Ringwald static uint32_t gap_random_adress_update_period; 4153deb3ec6SMatthias Ringwald 4163deb3ec6SMatthias Ringwald static void gap_random_address_trigger(void){ 4173deb3ec6SMatthias Ringwald if (rau_state != RAU_IDLE) return; 4183deb3ec6SMatthias Ringwald log_info("gap_random_address_trigger"); 4193deb3ec6SMatthias Ringwald rau_state = RAU_GET_RANDOM; 4203deb3ec6SMatthias Ringwald sm_run(); 4213deb3ec6SMatthias Ringwald } 4223deb3ec6SMatthias Ringwald 423ec820d77SMatthias Ringwald static void gap_random_address_update_handler(btstack_timer_source_t * timer){ 4243deb3ec6SMatthias Ringwald log_info("GAP Random Address Update due"); 425528a4a3bSMatthias Ringwald btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period); 426528a4a3bSMatthias Ringwald btstack_run_loop_add_timer(&gap_random_address_update_timer); 4273deb3ec6SMatthias Ringwald gap_random_address_trigger(); 4283deb3ec6SMatthias Ringwald } 4293deb3ec6SMatthias Ringwald 4303deb3ec6SMatthias Ringwald static void gap_random_address_update_start(void){ 431528a4a3bSMatthias Ringwald btstack_run_loop_set_timer_handler(&gap_random_address_update_timer, gap_random_address_update_handler); 432528a4a3bSMatthias Ringwald btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period); 433528a4a3bSMatthias Ringwald btstack_run_loop_add_timer(&gap_random_address_update_timer); 4343deb3ec6SMatthias Ringwald } 4353deb3ec6SMatthias Ringwald 4363deb3ec6SMatthias Ringwald static void gap_random_address_update_stop(void){ 437528a4a3bSMatthias Ringwald btstack_run_loop_remove_timer(&gap_random_address_update_timer); 4383deb3ec6SMatthias Ringwald } 4393deb3ec6SMatthias Ringwald 4403deb3ec6SMatthias Ringwald 4413deb3ec6SMatthias Ringwald static void sm_random_start(void * context){ 4423deb3ec6SMatthias Ringwald sm_random_context = context; 4433deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_rand); 4443deb3ec6SMatthias Ringwald } 4453deb3ec6SMatthias Ringwald 4463deb3ec6SMatthias Ringwald // pre: sm_aes128_state != SM_AES128_ACTIVE, hci_can_send_command == 1 4473deb3ec6SMatthias Ringwald // context is made availabe to aes128 result handler by this 4483deb3ec6SMatthias Ringwald static void sm_aes128_start(sm_key_t key, sm_key_t plaintext, void * context){ 4493deb3ec6SMatthias Ringwald sm_aes128_state = SM_AES128_ACTIVE; 4503deb3ec6SMatthias Ringwald sm_key_t key_flipped, plaintext_flipped; 4519c80e4ccSMatthias Ringwald reverse_128(key, key_flipped); 4529c80e4ccSMatthias Ringwald reverse_128(plaintext, plaintext_flipped); 4533deb3ec6SMatthias Ringwald sm_aes128_context = context; 4543deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_encrypt, key_flipped, plaintext_flipped); 4553deb3ec6SMatthias Ringwald } 4563deb3ec6SMatthias Ringwald 4573deb3ec6SMatthias Ringwald // ah(k,r) helper 4583deb3ec6SMatthias Ringwald // r = padding || r 4593deb3ec6SMatthias Ringwald // r - 24 bit value 4603deb3ec6SMatthias Ringwald static void sm_ah_r_prime(uint8_t r[3], sm_key_t r_prime){ 4613deb3ec6SMatthias Ringwald // r'= padding || r 4623deb3ec6SMatthias Ringwald memset(r_prime, 0, 16); 4633deb3ec6SMatthias Ringwald memcpy(&r_prime[13], r, 3); 4643deb3ec6SMatthias Ringwald } 4653deb3ec6SMatthias Ringwald 4663deb3ec6SMatthias Ringwald // d1 helper 4673deb3ec6SMatthias Ringwald // d' = padding || r || d 4683deb3ec6SMatthias Ringwald // d,r - 16 bit values 4693deb3ec6SMatthias Ringwald static void sm_d1_d_prime(uint16_t d, uint16_t r, sm_key_t d1_prime){ 4703deb3ec6SMatthias Ringwald // d'= padding || r || d 4713deb3ec6SMatthias Ringwald memset(d1_prime, 0, 16); 472f8fbdce0SMatthias Ringwald big_endian_store_16(d1_prime, 12, r); 473f8fbdce0SMatthias Ringwald big_endian_store_16(d1_prime, 14, d); 4743deb3ec6SMatthias Ringwald } 4753deb3ec6SMatthias Ringwald 4763deb3ec6SMatthias Ringwald // dm helper 4773deb3ec6SMatthias Ringwald // r’ = padding || r 4783deb3ec6SMatthias Ringwald // r - 64 bit value 4793deb3ec6SMatthias Ringwald static void sm_dm_r_prime(uint8_t r[8], sm_key_t r_prime){ 4803deb3ec6SMatthias Ringwald memset(r_prime, 0, 16); 4813deb3ec6SMatthias Ringwald memcpy(&r_prime[8], r, 8); 4823deb3ec6SMatthias Ringwald } 4833deb3ec6SMatthias Ringwald 4843deb3ec6SMatthias Ringwald // calculate arguments for first AES128 operation in C1 function 4853deb3ec6SMatthias Ringwald static void sm_c1_t1(sm_key_t r, uint8_t preq[7], uint8_t pres[7], uint8_t iat, uint8_t rat, sm_key_t t1){ 4863deb3ec6SMatthias Ringwald 4873deb3ec6SMatthias Ringwald // p1 = pres || preq || rat’ || iat’ 4883deb3ec6SMatthias Ringwald // "The octet of iat’ becomes the least significant octet of p1 and the most signifi- 4893deb3ec6SMatthias Ringwald // cant octet of pres becomes the most significant octet of p1. 4903deb3ec6SMatthias Ringwald // For example, if the 8-bit iat’ is 0x01, the 8-bit rat’ is 0x00, the 56-bit preq 4913deb3ec6SMatthias Ringwald // is 0x07071000000101 and the 56 bit pres is 0x05000800000302 then 4923deb3ec6SMatthias Ringwald // p1 is 0x05000800000302070710000001010001." 4933deb3ec6SMatthias Ringwald 4943deb3ec6SMatthias Ringwald sm_key_t p1; 4959c80e4ccSMatthias Ringwald reverse_56(pres, &p1[0]); 4969c80e4ccSMatthias Ringwald reverse_56(preq, &p1[7]); 4973deb3ec6SMatthias Ringwald p1[14] = rat; 4983deb3ec6SMatthias Ringwald p1[15] = iat; 4998314c363SMatthias Ringwald log_info_key("p1", p1); 5008314c363SMatthias Ringwald log_info_key("r", r); 5013deb3ec6SMatthias Ringwald 5023deb3ec6SMatthias Ringwald // t1 = r xor p1 5033deb3ec6SMatthias Ringwald int i; 5043deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 5053deb3ec6SMatthias Ringwald t1[i] = r[i] ^ p1[i]; 5063deb3ec6SMatthias Ringwald } 5078314c363SMatthias Ringwald log_info_key("t1", t1); 5083deb3ec6SMatthias Ringwald } 5093deb3ec6SMatthias Ringwald 5103deb3ec6SMatthias Ringwald // calculate arguments for second AES128 operation in C1 function 5113deb3ec6SMatthias Ringwald static void sm_c1_t3(sm_key_t t2, bd_addr_t ia, bd_addr_t ra, sm_key_t t3){ 5123deb3ec6SMatthias Ringwald // p2 = padding || ia || ra 5133deb3ec6SMatthias Ringwald // "The least significant octet of ra becomes the least significant octet of p2 and 5143deb3ec6SMatthias Ringwald // the most significant octet of padding becomes the most significant octet of p2. 5153deb3ec6SMatthias Ringwald // For example, if 48-bit ia is 0xA1A2A3A4A5A6 and the 48-bit ra is 5163deb3ec6SMatthias Ringwald // 0xB1B2B3B4B5B6 then p2 is 0x00000000A1A2A3A4A5A6B1B2B3B4B5B6. 5173deb3ec6SMatthias Ringwald 5183deb3ec6SMatthias Ringwald sm_key_t p2; 5193deb3ec6SMatthias Ringwald memset(p2, 0, 16); 5203deb3ec6SMatthias Ringwald memcpy(&p2[4], ia, 6); 5213deb3ec6SMatthias Ringwald memcpy(&p2[10], ra, 6); 5228314c363SMatthias Ringwald log_info_key("p2", p2); 5233deb3ec6SMatthias Ringwald 5243deb3ec6SMatthias Ringwald // c1 = e(k, t2_xor_p2) 5253deb3ec6SMatthias Ringwald int i; 5263deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 5273deb3ec6SMatthias Ringwald t3[i] = t2[i] ^ p2[i]; 5283deb3ec6SMatthias Ringwald } 5298314c363SMatthias Ringwald log_info_key("t3", t3); 5303deb3ec6SMatthias Ringwald } 5313deb3ec6SMatthias Ringwald 5323deb3ec6SMatthias Ringwald static void sm_s1_r_prime(sm_key_t r1, sm_key_t r2, sm_key_t r_prime){ 5338314c363SMatthias Ringwald log_info_key("r1", r1); 5348314c363SMatthias Ringwald log_info_key("r2", r2); 5353deb3ec6SMatthias Ringwald memcpy(&r_prime[8], &r2[8], 8); 5363deb3ec6SMatthias Ringwald memcpy(&r_prime[0], &r1[8], 8); 5373deb3ec6SMatthias Ringwald } 5383deb3ec6SMatthias Ringwald 539e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 540e53be891SMatthias Ringwald // Software implementations of crypto toolbox for LE Secure Connection 541e53be891SMatthias Ringwald // TODO: replace with code to use AES Engine of HCI Controller 542e53be891SMatthias Ringwald typedef uint8_t sm_key24_t[3]; 543e53be891SMatthias Ringwald typedef uint8_t sm_key56_t[7]; 544e53be891SMatthias Ringwald typedef uint8_t sm_key256_t[32]; 545e53be891SMatthias Ringwald 546e53be891SMatthias Ringwald static void aes128_calc_cyphertext(const uint8_t key[16], const uint8_t plaintext[16], uint8_t cyphertext[16]){ 547e53be891SMatthias Ringwald uint32_t rk[RKLENGTH(KEYBITS)]; 548e53be891SMatthias Ringwald int nrounds = rijndaelSetupEncrypt(rk, &key[0], KEYBITS); 549e53be891SMatthias Ringwald rijndaelEncrypt(rk, nrounds, plaintext, cyphertext); 550e53be891SMatthias Ringwald } 551e53be891SMatthias Ringwald 552e53be891SMatthias Ringwald static void calc_subkeys(sm_key_t k0, sm_key_t k1, sm_key_t k2){ 553e53be891SMatthias Ringwald memcpy(k1, k0, 16); 554e53be891SMatthias Ringwald sm_shift_left_by_one_bit_inplace(16, k1); 555e53be891SMatthias Ringwald if (k0[0] & 0x80){ 556e53be891SMatthias Ringwald k1[15] ^= 0x87; 557e53be891SMatthias Ringwald } 558e53be891SMatthias Ringwald memcpy(k2, k1, 16); 559e53be891SMatthias Ringwald sm_shift_left_by_one_bit_inplace(16, k2); 560e53be891SMatthias Ringwald if (k1[0] & 0x80){ 561e53be891SMatthias Ringwald k2[15] ^= 0x87; 562e53be891SMatthias Ringwald } 563e53be891SMatthias Ringwald } 564e53be891SMatthias Ringwald 565e53be891SMatthias Ringwald static void aes_cmac(sm_key_t aes_cmac, const sm_key_t key, const uint8_t * data, int cmac_message_len){ 566e53be891SMatthias Ringwald sm_key_t k0, k1, k2, zero; 567e53be891SMatthias Ringwald memset(zero, 0, 16); 568e53be891SMatthias Ringwald 569e53be891SMatthias Ringwald aes128_calc_cyphertext(key, zero, k0); 570e53be891SMatthias Ringwald calc_subkeys(k0, k1, k2); 571e53be891SMatthias Ringwald 572e53be891SMatthias Ringwald int cmac_block_count = (cmac_message_len + 15) / 16; 573e53be891SMatthias Ringwald 574e53be891SMatthias Ringwald // step 3: .. 575e53be891SMatthias Ringwald if (cmac_block_count==0){ 576e53be891SMatthias Ringwald cmac_block_count = 1; 577e53be891SMatthias Ringwald } 578e53be891SMatthias Ringwald 579e53be891SMatthias Ringwald // step 4: set m_last 580e53be891SMatthias Ringwald sm_key_t cmac_m_last; 581e53be891SMatthias Ringwald int sm_cmac_last_block_complete = cmac_message_len != 0 && (cmac_message_len & 0x0f) == 0; 582e53be891SMatthias Ringwald int i; 583e53be891SMatthias Ringwald if (sm_cmac_last_block_complete){ 584e53be891SMatthias Ringwald for (i=0;i<16;i++){ 585e53be891SMatthias Ringwald cmac_m_last[i] = data[cmac_message_len - 16 + i] ^ k1[i]; 586e53be891SMatthias Ringwald } 587e53be891SMatthias Ringwald } else { 588e53be891SMatthias Ringwald int valid_octets_in_last_block = cmac_message_len & 0x0f; 589e53be891SMatthias Ringwald for (i=0;i<16;i++){ 590e53be891SMatthias Ringwald if (i < valid_octets_in_last_block){ 591e53be891SMatthias Ringwald cmac_m_last[i] = data[(cmac_message_len & 0xfff0) + i] ^ k2[i]; 592e53be891SMatthias Ringwald continue; 593e53be891SMatthias Ringwald } 594e53be891SMatthias Ringwald if (i == valid_octets_in_last_block){ 595e53be891SMatthias Ringwald cmac_m_last[i] = 0x80 ^ k2[i]; 596e53be891SMatthias Ringwald continue; 597e53be891SMatthias Ringwald } 598e53be891SMatthias Ringwald cmac_m_last[i] = k2[i]; 599e53be891SMatthias Ringwald } 600e53be891SMatthias Ringwald } 601e53be891SMatthias Ringwald 602e53be891SMatthias Ringwald // printf("sm_cmac_start: len %u, block count %u\n", cmac_message_len, cmac_block_count); 603e53be891SMatthias Ringwald // LOG_KEY(cmac_m_last); 604e53be891SMatthias Ringwald 605e53be891SMatthias Ringwald // Step 5 606e53be891SMatthias Ringwald sm_key_t cmac_x; 607e53be891SMatthias Ringwald memset(cmac_x, 0, 16); 608e53be891SMatthias Ringwald 609e53be891SMatthias Ringwald // Step 6 610e53be891SMatthias Ringwald sm_key_t sm_cmac_y; 611e53be891SMatthias Ringwald for (int block = 0 ; block < cmac_block_count-1 ; block++){ 612e53be891SMatthias Ringwald for (i=0;i<16;i++){ 613e53be891SMatthias Ringwald sm_cmac_y[i] = cmac_x[i] ^ data[block * 16 + i]; 614e53be891SMatthias Ringwald } 615e53be891SMatthias Ringwald aes128_calc_cyphertext(key, sm_cmac_y, cmac_x); 616e53be891SMatthias Ringwald } 617e53be891SMatthias Ringwald for (i=0;i<16;i++){ 618e53be891SMatthias Ringwald sm_cmac_y[i] = cmac_x[i] ^ cmac_m_last[i]; 619e53be891SMatthias Ringwald } 620e53be891SMatthias Ringwald 621e53be891SMatthias Ringwald // Step 7 622e53be891SMatthias Ringwald aes128_calc_cyphertext(key, sm_cmac_y, aes_cmac); 623e53be891SMatthias Ringwald } 624e53be891SMatthias Ringwald 625e53be891SMatthias Ringwald const sm_key_t f5_salt = { 0x6C ,0x88, 0x83, 0x91, 0xAA, 0xF5, 0xA5, 0x38, 0x60, 0x37, 0x0B, 0xDB, 0x5A, 0x60, 0x83, 0xBE}; 626e53be891SMatthias Ringwald const uint8_t f5_key_id[] = { 0x62, 0x74, 0x6c, 0x65 }; 627e53be891SMatthias Ringwald const uint8_t f5_length[] = { 0x01, 0x00}; 628e53be891SMatthias Ringwald static void f5(sm_key256_t res, const sm_key256_t w, const sm_key_t n1, const sm_key_t n2, const sm_key56_t a1, const sm_key56_t a2){ 629e53be891SMatthias Ringwald // T = AES-CMACSAL_T(W) 630e53be891SMatthias Ringwald sm_key_t t; 631e53be891SMatthias Ringwald aes_cmac(t, f5_salt, w, 32); 632e53be891SMatthias Ringwald // f5(W, N1, N2, A1, A2) = AES-CMACT (Counter = 0 || keyID || N1 || N2|| A1|| A2 || Length = 256) -- this is the MacKey 633e53be891SMatthias Ringwald uint8_t buffer[53]; 634e53be891SMatthias Ringwald buffer[0] = 0; 635e53be891SMatthias Ringwald memcpy(buffer+01, f5_key_id, 4); 636e53be891SMatthias Ringwald memcpy(buffer+05, n1, 16); 637e53be891SMatthias Ringwald memcpy(buffer+21, n2, 16); 638e53be891SMatthias Ringwald memcpy(buffer+37, a1, 7); 639e53be891SMatthias Ringwald memcpy(buffer+44, a2, 7); 640e53be891SMatthias Ringwald memcpy(buffer+51, f5_length, 2); 641e53be891SMatthias Ringwald log_info("f5 DHKEY"); 642e53be891SMatthias Ringwald log_info_hexdump(w, 32); 643e53be891SMatthias Ringwald log_info("f5 key"); 644e53be891SMatthias Ringwald log_info_hexdump(t, 16); 645e53be891SMatthias Ringwald log_info("f5 message for MacKey"); 646e53be891SMatthias Ringwald log_info_hexdump(buffer, sizeof(buffer)); 647e53be891SMatthias Ringwald aes_cmac(res, t, buffer, sizeof(buffer)); 648e53be891SMatthias Ringwald // hexdump2(res, 16); 649e53be891SMatthias Ringwald // || AES-CMACT (Counter = 1 || keyID || N1 || N2|| A1|| A2 || Length = 256) -- this is the LTK 650e53be891SMatthias Ringwald buffer[0] = 1; 651e53be891SMatthias Ringwald // hexdump2(buffer, sizeof(buffer)); 652e53be891SMatthias Ringwald log_info("f5 message for LTK"); 653e53be891SMatthias Ringwald log_info_hexdump(buffer, sizeof(buffer)); 654e53be891SMatthias Ringwald aes_cmac(res+16, t, buffer, sizeof(buffer)); 655e53be891SMatthias Ringwald // hexdump2(res+16, 16); 656e53be891SMatthias Ringwald } 657e53be891SMatthias Ringwald 658e53be891SMatthias Ringwald // g2(U, V, X, Y) = AES-CMACX(U || V || Y) mod 2^32 659e53be891SMatthias Ringwald // - U is 256 bits 660e53be891SMatthias Ringwald // - V is 256 bits 661e53be891SMatthias Ringwald // - X is 128 bits 662e53be891SMatthias Ringwald // - Y is 128 bits 663e53be891SMatthias Ringwald static uint32_t g2(const sm_key256_t u, const sm_key256_t v, const sm_key_t x, const sm_key_t y){ 664e53be891SMatthias Ringwald uint8_t buffer[80]; 665e53be891SMatthias Ringwald memcpy(buffer, u, 32); 666e53be891SMatthias Ringwald memcpy(buffer+32, v, 32); 667e53be891SMatthias Ringwald memcpy(buffer+64, y, 16); 668e53be891SMatthias Ringwald sm_key_t cmac; 669446a8c36SMatthias Ringwald log_info("g2 key"); 670446a8c36SMatthias Ringwald log_info_hexdump(x, 16); 671446a8c36SMatthias Ringwald log_info("g2 message"); 672446a8c36SMatthias Ringwald log_info_hexdump(buffer, sizeof(buffer)); 673e53be891SMatthias Ringwald aes_cmac(cmac, x, buffer, sizeof(buffer)); 674446a8c36SMatthias Ringwald log_info("g2 result"); 675446a8c36SMatthias Ringwald log_info_hexdump(x, 16); 676446a8c36SMatthias Ringwald return big_endian_read_32(cmac, 12); 677e53be891SMatthias Ringwald } 678e53be891SMatthias Ringwald 679446a8c36SMatthias Ringwald #if 0 680e53be891SMatthias Ringwald // h6(W, keyID) = AES-CMACW(keyID) 681e53be891SMatthias Ringwald // - W is 128 bits 682e53be891SMatthias Ringwald // - keyID is 32 bits 683e53be891SMatthias Ringwald static void h6(sm_key_t res, const sm_key_t w, const uint32_t key_id){ 684e53be891SMatthias Ringwald uint8_t key_id_buffer[4]; 685e53be891SMatthias Ringwald big_endian_store_32(key_id_buffer, 0, key_id); 686e53be891SMatthias Ringwald aes_cmac(res, w, key_id_buffer, 4); 687e53be891SMatthias Ringwald } 688e53be891SMatthias Ringwald #endif 689e53be891SMatthias Ringwald #endif 690e53be891SMatthias Ringwald 691711e6c80SMatthias 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){ 6923deb3ec6SMatthias Ringwald event[0] = type; 6933deb3ec6SMatthias Ringwald event[1] = event_size - 2; 694711e6c80SMatthias Ringwald little_endian_store_16(event, 2, con_handle); 6953deb3ec6SMatthias Ringwald event[4] = addr_type; 696724d70a2SMatthias Ringwald reverse_bd_addr(address, &event[5]); 6973deb3ec6SMatthias Ringwald } 6983deb3ec6SMatthias Ringwald 69989a78d34SMatthias Ringwald static void sm_dispatch_event(uint8_t packet_type, uint16_t channel, uint8_t * packet, uint16_t size){ 70089a78d34SMatthias Ringwald if (sm_client_packet_handler) { 70189a78d34SMatthias Ringwald sm_client_packet_handler(HCI_EVENT_PACKET, 0, packet, size); 70289a78d34SMatthias Ringwald } 70389a78d34SMatthias Ringwald // dispatch to all event handlers 70489a78d34SMatthias Ringwald btstack_linked_list_iterator_t it; 70589a78d34SMatthias Ringwald btstack_linked_list_iterator_init(&it, &sm_event_handlers); 70689a78d34SMatthias Ringwald while (btstack_linked_list_iterator_has_next(&it)){ 70789a78d34SMatthias Ringwald btstack_packet_callback_registration_t * entry = (btstack_packet_callback_registration_t*) btstack_linked_list_iterator_next(&it); 708d9a7306aSMatthias Ringwald entry->callback(packet_type, 0, packet, size); 70989a78d34SMatthias Ringwald } 71089a78d34SMatthias Ringwald } 71189a78d34SMatthias Ringwald 712711e6c80SMatthias Ringwald static void sm_notify_client_base(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address){ 7133deb3ec6SMatthias Ringwald uint8_t event[11]; 714711e6c80SMatthias Ringwald sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address); 71589a78d34SMatthias Ringwald sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event)); 7163deb3ec6SMatthias Ringwald } 7173deb3ec6SMatthias Ringwald 718711e6c80SMatthias 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){ 7193deb3ec6SMatthias Ringwald uint8_t event[15]; 720711e6c80SMatthias Ringwald sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address); 721f8fbdce0SMatthias Ringwald little_endian_store_32(event, 11, passkey); 72289a78d34SMatthias Ringwald sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event)); 7233deb3ec6SMatthias Ringwald } 7243deb3ec6SMatthias Ringwald 725711e6c80SMatthias 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){ 7263deb3ec6SMatthias Ringwald uint8_t event[13]; 727711e6c80SMatthias Ringwald sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address); 728f8fbdce0SMatthias Ringwald little_endian_store_16(event, 11, index); 72989a78d34SMatthias Ringwald sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event)); 7303deb3ec6SMatthias Ringwald } 7313deb3ec6SMatthias Ringwald 732711e6c80SMatthias 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){ 7333deb3ec6SMatthias Ringwald 7343deb3ec6SMatthias Ringwald uint8_t event[18]; 735711e6c80SMatthias Ringwald sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address); 7363deb3ec6SMatthias Ringwald event[11] = result; 73789a78d34SMatthias Ringwald sm_dispatch_event(HCI_EVENT_PACKET, 0, (uint8_t*) &event, sizeof(event)); 7383deb3ec6SMatthias Ringwald } 7393deb3ec6SMatthias Ringwald 7403deb3ec6SMatthias Ringwald // decide on stk generation based on 7413deb3ec6SMatthias Ringwald // - pairing request 7423deb3ec6SMatthias Ringwald // - io capabilities 7433deb3ec6SMatthias Ringwald // - OOB data availability 7443deb3ec6SMatthias Ringwald static void sm_setup_tk(void){ 7453deb3ec6SMatthias Ringwald 7463deb3ec6SMatthias Ringwald // default: just works 7473deb3ec6SMatthias Ringwald setup->sm_stk_generation_method = JUST_WORKS; 7483deb3ec6SMatthias Ringwald 74927c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 75027c32905SMatthias Ringwald setup->sm_use_secure_connections = ( sm_pairing_packet_get_auth_req(setup->sm_m_preq) 75127c32905SMatthias Ringwald & sm_pairing_packet_get_auth_req(setup->sm_s_pres) 75227c32905SMatthias Ringwald & SM_AUTHREQ_SECURE_CONNECTION ) != 0; 753446a8c36SMatthias Ringwald memset(setup->sm_ra, 0, 16); 754446a8c36SMatthias Ringwald memset(setup->sm_rb, 0, 16); 75527c32905SMatthias Ringwald #else 75627c32905SMatthias Ringwald setup->sm_use_secure_connections = 0; 75727c32905SMatthias Ringwald #endif 75827c32905SMatthias Ringwald 75927c32905SMatthias Ringwald // If both devices have not set the MITM option in the Authentication Requirements 76027c32905SMatthias Ringwald // Flags, then the IO capabilities shall be ignored and the Just Works association 76127c32905SMatthias Ringwald // model shall be used. 76227c32905SMatthias Ringwald if (((sm_pairing_packet_get_auth_req(setup->sm_m_preq) & SM_AUTHREQ_MITM_PROTECTION) == 0) 76327c32905SMatthias Ringwald && ((sm_pairing_packet_get_auth_req(setup->sm_s_pres) & SM_AUTHREQ_MITM_PROTECTION) == 0)){ 76427c32905SMatthias Ringwald log_info("SM: MITM not required by both -> JUST WORKS"); 76527c32905SMatthias Ringwald return; 76627c32905SMatthias Ringwald } 76727c32905SMatthias Ringwald 76827c32905SMatthias Ringwald // TODO: with LE SC, OOB is used to transfer data OOB during pairing, single device with OOB is sufficient 76927c32905SMatthias Ringwald 7703deb3ec6SMatthias Ringwald // If both devices have out of band authentication data, then the Authentication 7713deb3ec6SMatthias Ringwald // Requirements Flags shall be ignored when selecting the pairing method and the 7723deb3ec6SMatthias Ringwald // Out of Band pairing method shall be used. 7731ad129beSMatthias Ringwald if (sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq) 7741ad129beSMatthias Ringwald && sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres)){ 7753deb3ec6SMatthias Ringwald log_info("SM: have OOB data"); 7768314c363SMatthias Ringwald log_info_key("OOB", setup->sm_tk); 7773deb3ec6SMatthias Ringwald setup->sm_stk_generation_method = OOB; 7783deb3ec6SMatthias Ringwald return; 7793deb3ec6SMatthias Ringwald } 7803deb3ec6SMatthias Ringwald 7813deb3ec6SMatthias Ringwald // Reset TK as it has been setup in sm_init_setup 7823deb3ec6SMatthias Ringwald sm_reset_tk(); 7833deb3ec6SMatthias Ringwald 7843deb3ec6SMatthias Ringwald // Also use just works if unknown io capabilites 7858da2e96dSMatthias 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)){ 7863deb3ec6SMatthias Ringwald return; 7873deb3ec6SMatthias Ringwald } 7883deb3ec6SMatthias Ringwald 7893deb3ec6SMatthias Ringwald // Otherwise the IO capabilities of the devices shall be used to determine the 7903deb3ec6SMatthias Ringwald // pairing method as defined in Table 2.4. 79127c32905SMatthias Ringwald // see http://stackoverflow.com/a/1052837/393697 for how to specify pointer to 2-dimensional array 79227c32905SMatthias Ringwald const stk_generation_method_t (*generation_method)[5] = stk_generation_method; 79327c32905SMatthias Ringwald 79427c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 795c6b7cbd9SMatthias Ringwald // table not define by default 79627c32905SMatthias Ringwald if (setup->sm_use_secure_connections){ 79727c32905SMatthias Ringwald generation_method = stk_generation_method_with_secure_connection; 79827c32905SMatthias Ringwald } 79927c32905SMatthias Ringwald #endif 80027c32905SMatthias 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)]; 80127c32905SMatthias Ringwald 8023deb3ec6SMatthias Ringwald log_info("sm_setup_tk: master io cap: %u, slave io cap: %u -> method %u", 8031ad129beSMatthias 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); 8043deb3ec6SMatthias Ringwald } 8053deb3ec6SMatthias Ringwald 8063deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_set(uint8_t key_set){ 8073deb3ec6SMatthias Ringwald int flags = 0; 8083deb3ec6SMatthias Ringwald if (key_set & SM_KEYDIST_ENC_KEY){ 8093deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION; 8103deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION; 8113deb3ec6SMatthias Ringwald } 8123deb3ec6SMatthias Ringwald if (key_set & SM_KEYDIST_ID_KEY){ 8133deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION; 8143deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION; 8153deb3ec6SMatthias Ringwald } 8163deb3ec6SMatthias Ringwald if (key_set & SM_KEYDIST_SIGN){ 8173deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION; 8183deb3ec6SMatthias Ringwald } 8193deb3ec6SMatthias Ringwald return flags; 8203deb3ec6SMatthias Ringwald } 8213deb3ec6SMatthias Ringwald 8223deb3ec6SMatthias Ringwald static void sm_setup_key_distribution(uint8_t key_set){ 8233deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set = 0; 8243deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set = sm_key_distribution_flags_for_set(key_set); 8253deb3ec6SMatthias Ringwald } 8263deb3ec6SMatthias Ringwald 8273deb3ec6SMatthias Ringwald // CSRK Key Lookup 8283deb3ec6SMatthias Ringwald 8293deb3ec6SMatthias Ringwald 8303deb3ec6SMatthias Ringwald static int sm_address_resolution_idle(void){ 8313deb3ec6SMatthias Ringwald return sm_address_resolution_mode == ADDRESS_RESOLUTION_IDLE; 8323deb3ec6SMatthias Ringwald } 8333deb3ec6SMatthias Ringwald 834711e6c80SMatthias 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){ 8353deb3ec6SMatthias Ringwald memcpy(sm_address_resolution_address, addr, 6); 8363deb3ec6SMatthias Ringwald sm_address_resolution_addr_type = addr_type; 8373deb3ec6SMatthias Ringwald sm_address_resolution_test = 0; 8383deb3ec6SMatthias Ringwald sm_address_resolution_mode = mode; 8393deb3ec6SMatthias Ringwald sm_address_resolution_context = context; 840711e6c80SMatthias Ringwald sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_STARTED, con_handle, addr_type, addr); 8413deb3ec6SMatthias Ringwald } 8423deb3ec6SMatthias Ringwald 8433deb3ec6SMatthias Ringwald int sm_address_resolution_lookup(uint8_t address_type, bd_addr_t address){ 8443deb3ec6SMatthias Ringwald // check if already in list 845665d90f2SMatthias Ringwald btstack_linked_list_iterator_t it; 8463deb3ec6SMatthias Ringwald sm_lookup_entry_t * entry; 847665d90f2SMatthias Ringwald btstack_linked_list_iterator_init(&it, &sm_address_resolution_general_queue); 848665d90f2SMatthias Ringwald while(btstack_linked_list_iterator_has_next(&it)){ 849665d90f2SMatthias Ringwald entry = (sm_lookup_entry_t *) btstack_linked_list_iterator_next(&it); 8503deb3ec6SMatthias Ringwald if (entry->address_type != address_type) continue; 8513deb3ec6SMatthias Ringwald if (memcmp(entry->address, address, 6)) continue; 8523deb3ec6SMatthias Ringwald // already in list 8533deb3ec6SMatthias Ringwald return BTSTACK_BUSY; 8543deb3ec6SMatthias Ringwald } 8553deb3ec6SMatthias Ringwald entry = btstack_memory_sm_lookup_entry_get(); 8563deb3ec6SMatthias Ringwald if (!entry) return BTSTACK_MEMORY_ALLOC_FAILED; 8573deb3ec6SMatthias Ringwald entry->address_type = (bd_addr_type_t) address_type; 8583deb3ec6SMatthias Ringwald memcpy(entry->address, address, 6); 859665d90f2SMatthias Ringwald btstack_linked_list_add(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry); 8603deb3ec6SMatthias Ringwald sm_run(); 8613deb3ec6SMatthias Ringwald return 0; 8623deb3ec6SMatthias Ringwald } 8633deb3ec6SMatthias Ringwald 8643deb3ec6SMatthias Ringwald // CMAC Implementation using AES128 engine 8653deb3ec6SMatthias Ringwald static void sm_shift_left_by_one_bit_inplace(int len, uint8_t * data){ 8663deb3ec6SMatthias Ringwald int i; 8673deb3ec6SMatthias Ringwald int carry = 0; 8683deb3ec6SMatthias Ringwald for (i=len-1; i >= 0 ; i--){ 8693deb3ec6SMatthias Ringwald int new_carry = data[i] >> 7; 8703deb3ec6SMatthias Ringwald data[i] = data[i] << 1 | carry; 8713deb3ec6SMatthias Ringwald carry = new_carry; 8723deb3ec6SMatthias Ringwald } 8733deb3ec6SMatthias Ringwald } 8743deb3ec6SMatthias Ringwald 8753deb3ec6SMatthias 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 8763deb3ec6SMatthias Ringwald static inline void sm_next_responding_state(sm_connection_t * sm_conn){ 8773deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = (security_manager_state_t) (((int)sm_conn->sm_engine_state) + 1); 8783deb3ec6SMatthias Ringwald } 8793deb3ec6SMatthias Ringwald static inline void dkg_next_state(void){ 8803deb3ec6SMatthias Ringwald dkg_state = (derived_key_generation_t) (((int)dkg_state) + 1); 8813deb3ec6SMatthias Ringwald } 8823deb3ec6SMatthias Ringwald static inline void rau_next_state(void){ 8833deb3ec6SMatthias Ringwald rau_state = (random_address_update_t) (((int)rau_state) + 1); 8843deb3ec6SMatthias Ringwald } 885514d35fcSMatthias Ringwald 886514d35fcSMatthias Ringwald // CMAC calculation using AES Engine 887514d35fcSMatthias Ringwald 8883deb3ec6SMatthias Ringwald static inline void sm_cmac_next_state(void){ 8893deb3ec6SMatthias Ringwald sm_cmac_state = (cmac_state_t) (((int)sm_cmac_state) + 1); 8903deb3ec6SMatthias Ringwald } 891514d35fcSMatthias Ringwald 8923deb3ec6SMatthias Ringwald static int sm_cmac_last_block_complete(void){ 8933deb3ec6SMatthias Ringwald if (sm_cmac_message_len == 0) return 0; 8943deb3ec6SMatthias Ringwald return (sm_cmac_message_len & 0x0f) == 0; 8953deb3ec6SMatthias Ringwald } 896514d35fcSMatthias Ringwald 897514d35fcSMatthias Ringwald static inline uint8_t sm_cmac_message_get_byte(uint16_t offset){ 8983deb3ec6SMatthias Ringwald if (offset >= sm_cmac_message_len) { 8993deb3ec6SMatthias Ringwald log_error("sm_cmac_message_get_byte. out of bounds, access %u, len %u", offset, sm_cmac_message_len); 9003deb3ec6SMatthias Ringwald return 0; 9013deb3ec6SMatthias Ringwald } 9023deb3ec6SMatthias Ringwald 9033deb3ec6SMatthias Ringwald offset = sm_cmac_message_len - 1 - offset; 9043deb3ec6SMatthias Ringwald 9053deb3ec6SMatthias Ringwald // sm_cmac_header[3] | message[] | sm_cmac_sign_counter[4] 9063deb3ec6SMatthias Ringwald if (offset < 3){ 9073deb3ec6SMatthias Ringwald return sm_cmac_header[offset]; 9083deb3ec6SMatthias Ringwald } 9093deb3ec6SMatthias Ringwald int actual_message_len_incl_header = sm_cmac_message_len - 4; 9103deb3ec6SMatthias Ringwald if (offset < actual_message_len_incl_header){ 9113deb3ec6SMatthias Ringwald return sm_cmac_message[offset - 3]; 9123deb3ec6SMatthias Ringwald } 9133deb3ec6SMatthias Ringwald return sm_cmac_sign_counter[offset - actual_message_len_incl_header]; 9143deb3ec6SMatthias Ringwald } 9153deb3ec6SMatthias Ringwald 916514d35fcSMatthias Ringwald // generic cmac calculation 917aec94140SMatthias 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])){ 918514d35fcSMatthias Ringwald // Generalized CMAC 919514d35fcSMatthias Ringwald memcpy(sm_cmac_k, key, 16); 9203deb3ec6SMatthias Ringwald memset(sm_cmac_x, 0, 16); 921514d35fcSMatthias Ringwald sm_cmac_block_current = 0; 922514d35fcSMatthias Ringwald sm_cmac_message_len = message_len; 923514d35fcSMatthias Ringwald sm_cmac_done_handler = done_callback; 924514d35fcSMatthias Ringwald sm_cmac_get_byte = get_byte_callback; 9253deb3ec6SMatthias Ringwald 9263deb3ec6SMatthias Ringwald // step 2: n := ceil(len/const_Bsize); 9273deb3ec6SMatthias Ringwald sm_cmac_block_count = (sm_cmac_message_len + 15) / 16; 9283deb3ec6SMatthias Ringwald 9293deb3ec6SMatthias Ringwald // step 3: .. 9303deb3ec6SMatthias Ringwald if (sm_cmac_block_count==0){ 9313deb3ec6SMatthias Ringwald sm_cmac_block_count = 1; 9323deb3ec6SMatthias Ringwald } 9333deb3ec6SMatthias Ringwald 934514d35fcSMatthias Ringwald log_info("sm_cmac_general_start: len %u, block count %u", sm_cmac_message_len, sm_cmac_block_count); 9353deb3ec6SMatthias Ringwald 9363deb3ec6SMatthias Ringwald // first, we need to compute l for k1, k2, and m_last 9373deb3ec6SMatthias Ringwald sm_cmac_state = CMAC_CALC_SUBKEYS; 9383deb3ec6SMatthias Ringwald 9393deb3ec6SMatthias Ringwald // let's go 9403deb3ec6SMatthias Ringwald sm_run(); 9413deb3ec6SMatthias Ringwald } 9423deb3ec6SMatthias Ringwald 943514d35fcSMatthias Ringwald // cmac for ATT Message signing 944aec94140SMatthias Ringwald void sm_cmac_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)){ 945514d35fcSMatthias Ringwald // ATT Message Signing 946514d35fcSMatthias Ringwald sm_cmac_header[0] = opcode; 947514d35fcSMatthias Ringwald little_endian_store_16(sm_cmac_header, 1, con_handle); 948514d35fcSMatthias Ringwald little_endian_store_32(sm_cmac_sign_counter, 0, sign_counter); 949514d35fcSMatthias Ringwald uint16_t total_message_len = 3 + message_len + 4; // incl. virtually prepended att opcode, handle and appended sign_counter in LE 950514d35fcSMatthias Ringwald sm_cmac_message = message; 951514d35fcSMatthias Ringwald sm_cmac_general_start(k, total_message_len, &sm_cmac_message_get_byte, done_handler); 952514d35fcSMatthias Ringwald } 953514d35fcSMatthias Ringwald 9543deb3ec6SMatthias Ringwald int sm_cmac_ready(void){ 9553deb3ec6SMatthias Ringwald return sm_cmac_state == CMAC_IDLE; 9563deb3ec6SMatthias Ringwald } 9573deb3ec6SMatthias Ringwald 9583deb3ec6SMatthias Ringwald static void sm_cmac_handle_aes_engine_ready(void){ 9593deb3ec6SMatthias Ringwald switch (sm_cmac_state){ 9603deb3ec6SMatthias Ringwald case CMAC_CALC_SUBKEYS: { 9613deb3ec6SMatthias Ringwald sm_key_t const_zero; 9623deb3ec6SMatthias Ringwald memset(const_zero, 0, 16); 9633deb3ec6SMatthias Ringwald sm_cmac_next_state(); 9643deb3ec6SMatthias Ringwald sm_aes128_start(sm_cmac_k, const_zero, NULL); 9653deb3ec6SMatthias Ringwald break; 9663deb3ec6SMatthias Ringwald } 9673deb3ec6SMatthias Ringwald case CMAC_CALC_MI: { 9683deb3ec6SMatthias Ringwald int j; 9693deb3ec6SMatthias Ringwald sm_key_t y; 9703deb3ec6SMatthias Ringwald for (j=0;j<16;j++){ 971514d35fcSMatthias Ringwald y[j] = sm_cmac_x[j] ^ sm_cmac_get_byte(sm_cmac_block_current*16 + j); 9723deb3ec6SMatthias Ringwald } 9733deb3ec6SMatthias Ringwald sm_cmac_block_current++; 9743deb3ec6SMatthias Ringwald sm_cmac_next_state(); 9753deb3ec6SMatthias Ringwald sm_aes128_start(sm_cmac_k, y, NULL); 9763deb3ec6SMatthias Ringwald break; 9773deb3ec6SMatthias Ringwald } 9783deb3ec6SMatthias Ringwald case CMAC_CALC_MLAST: { 9793deb3ec6SMatthias Ringwald int i; 9803deb3ec6SMatthias Ringwald sm_key_t y; 9813deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 9823deb3ec6SMatthias Ringwald y[i] = sm_cmac_x[i] ^ sm_cmac_m_last[i]; 9833deb3ec6SMatthias Ringwald } 9848314c363SMatthias Ringwald log_info_key("Y", y); 9853deb3ec6SMatthias Ringwald sm_cmac_block_current++; 9863deb3ec6SMatthias Ringwald sm_cmac_next_state(); 9873deb3ec6SMatthias Ringwald sm_aes128_start(sm_cmac_k, y, NULL); 9883deb3ec6SMatthias Ringwald break; 9893deb3ec6SMatthias Ringwald } 9903deb3ec6SMatthias Ringwald default: 9913deb3ec6SMatthias Ringwald log_info("sm_cmac_handle_aes_engine_ready called in state %u", sm_cmac_state); 9923deb3ec6SMatthias Ringwald break; 9933deb3ec6SMatthias Ringwald } 9943deb3ec6SMatthias Ringwald } 9953deb3ec6SMatthias Ringwald 9963deb3ec6SMatthias Ringwald static void sm_cmac_handle_encryption_result(sm_key_t data){ 9973deb3ec6SMatthias Ringwald switch (sm_cmac_state){ 9983deb3ec6SMatthias Ringwald case CMAC_W4_SUBKEYS: { 9993deb3ec6SMatthias Ringwald sm_key_t k1; 10003deb3ec6SMatthias Ringwald memcpy(k1, data, 16); 10013deb3ec6SMatthias Ringwald sm_shift_left_by_one_bit_inplace(16, k1); 10023deb3ec6SMatthias Ringwald if (data[0] & 0x80){ 10033deb3ec6SMatthias Ringwald k1[15] ^= 0x87; 10043deb3ec6SMatthias Ringwald } 10053deb3ec6SMatthias Ringwald sm_key_t k2; 10063deb3ec6SMatthias Ringwald memcpy(k2, k1, 16); 10073deb3ec6SMatthias Ringwald sm_shift_left_by_one_bit_inplace(16, k2); 10083deb3ec6SMatthias Ringwald if (k1[0] & 0x80){ 10093deb3ec6SMatthias Ringwald k2[15] ^= 0x87; 10103deb3ec6SMatthias Ringwald } 10113deb3ec6SMatthias Ringwald 10128314c363SMatthias Ringwald log_info_key("k", sm_cmac_k); 10138314c363SMatthias Ringwald log_info_key("k1", k1); 10148314c363SMatthias Ringwald log_info_key("k2", k2); 10153deb3ec6SMatthias Ringwald 10163deb3ec6SMatthias Ringwald // step 4: set m_last 10173deb3ec6SMatthias Ringwald int i; 10183deb3ec6SMatthias Ringwald if (sm_cmac_last_block_complete()){ 10193deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 1020514d35fcSMatthias Ringwald sm_cmac_m_last[i] = sm_cmac_get_byte(sm_cmac_message_len - 16 + i) ^ k1[i]; 10213deb3ec6SMatthias Ringwald } 10223deb3ec6SMatthias Ringwald } else { 10233deb3ec6SMatthias Ringwald int valid_octets_in_last_block = sm_cmac_message_len & 0x0f; 10243deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 10253deb3ec6SMatthias Ringwald if (i < valid_octets_in_last_block){ 1026514d35fcSMatthias Ringwald sm_cmac_m_last[i] = sm_cmac_get_byte((sm_cmac_message_len & 0xfff0) + i) ^ k2[i]; 10273deb3ec6SMatthias Ringwald continue; 10283deb3ec6SMatthias Ringwald } 10293deb3ec6SMatthias Ringwald if (i == valid_octets_in_last_block){ 10303deb3ec6SMatthias Ringwald sm_cmac_m_last[i] = 0x80 ^ k2[i]; 10313deb3ec6SMatthias Ringwald continue; 10323deb3ec6SMatthias Ringwald } 10333deb3ec6SMatthias Ringwald sm_cmac_m_last[i] = k2[i]; 10343deb3ec6SMatthias Ringwald } 10353deb3ec6SMatthias Ringwald } 10363deb3ec6SMatthias Ringwald 10373deb3ec6SMatthias Ringwald // next 10383deb3ec6SMatthias Ringwald sm_cmac_state = sm_cmac_block_current < sm_cmac_block_count - 1 ? CMAC_CALC_MI : CMAC_CALC_MLAST; 10393deb3ec6SMatthias Ringwald break; 10403deb3ec6SMatthias Ringwald } 10413deb3ec6SMatthias Ringwald case CMAC_W4_MI: 10423deb3ec6SMatthias Ringwald memcpy(sm_cmac_x, data, 16); 10433deb3ec6SMatthias Ringwald sm_cmac_state = sm_cmac_block_current < sm_cmac_block_count - 1 ? CMAC_CALC_MI : CMAC_CALC_MLAST; 10443deb3ec6SMatthias Ringwald break; 10453deb3ec6SMatthias Ringwald case CMAC_W4_MLAST: 10463deb3ec6SMatthias Ringwald // done 10478314c363SMatthias Ringwald log_info_key("CMAC", data); 10483deb3ec6SMatthias Ringwald sm_cmac_done_handler(data); 10493deb3ec6SMatthias Ringwald sm_cmac_state = CMAC_IDLE; 10503deb3ec6SMatthias Ringwald break; 10513deb3ec6SMatthias Ringwald default: 10523deb3ec6SMatthias Ringwald log_info("sm_cmac_handle_encryption_result called in state %u", sm_cmac_state); 10533deb3ec6SMatthias Ringwald break; 10543deb3ec6SMatthias Ringwald } 10553deb3ec6SMatthias Ringwald } 10563deb3ec6SMatthias Ringwald 10573deb3ec6SMatthias Ringwald static void sm_trigger_user_response(sm_connection_t * sm_conn){ 1058446a8c36SMatthias Ringwald // notify client for: JUST WORKS confirm, Numeric comparison confirm, PASSKEY display or input 10593deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_IDLE; 10603deb3ec6SMatthias Ringwald switch (setup->sm_stk_generation_method){ 10613deb3ec6SMatthias Ringwald case PK_RESP_INPUT: 10623deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 10633deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PENDING; 10645611a760SMatthias 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); 10653deb3ec6SMatthias Ringwald } else { 1066c9b8fdd9SMatthias 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)); 10673deb3ec6SMatthias Ringwald } 10683deb3ec6SMatthias Ringwald break; 10693deb3ec6SMatthias Ringwald case PK_INIT_INPUT: 10703deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 1071c9b8fdd9SMatthias 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)); 10723deb3ec6SMatthias Ringwald } else { 10733deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PENDING; 10745611a760SMatthias 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); 10753deb3ec6SMatthias Ringwald } 10763deb3ec6SMatthias Ringwald break; 10773deb3ec6SMatthias Ringwald case OK_BOTH_INPUT: 10783deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PENDING; 10795611a760SMatthias 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); 10803deb3ec6SMatthias Ringwald break; 108127c32905SMatthias Ringwald case NK_BOTH_INPUT: 1082446a8c36SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PENDING; 1083c8c46d51SMatthias 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)); 108427c32905SMatthias Ringwald break; 10853deb3ec6SMatthias Ringwald case JUST_WORKS: 10863deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PENDING; 10875611a760SMatthias 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); 10883deb3ec6SMatthias Ringwald break; 10893deb3ec6SMatthias Ringwald case OOB: 10903deb3ec6SMatthias Ringwald // client already provided OOB data, let's skip notification. 10913deb3ec6SMatthias Ringwald break; 10923deb3ec6SMatthias Ringwald } 10933deb3ec6SMatthias Ringwald } 10943deb3ec6SMatthias Ringwald 10953deb3ec6SMatthias Ringwald static int sm_key_distribution_all_received(sm_connection_t * sm_conn){ 10963deb3ec6SMatthias Ringwald int recv_flags; 10973deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 109852f9cf63SMatthias Ringwald // slave / responder 10991ad129beSMatthias Ringwald recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres)); 11003deb3ec6SMatthias Ringwald } else { 11013deb3ec6SMatthias Ringwald // master / initiator 11021ad129beSMatthias Ringwald recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_responder_key_distribution(setup->sm_s_pres)); 11033deb3ec6SMatthias Ringwald } 11043deb3ec6SMatthias Ringwald log_debug("sm_key_distribution_all_received: received 0x%02x, expecting 0x%02x", setup->sm_key_distribution_received_set, recv_flags); 11053deb3ec6SMatthias Ringwald return recv_flags == setup->sm_key_distribution_received_set; 11063deb3ec6SMatthias Ringwald } 11073deb3ec6SMatthias Ringwald 1108711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle){ 1109711e6c80SMatthias Ringwald if (sm_active_connection == con_handle){ 11103deb3ec6SMatthias Ringwald sm_timeout_stop(); 11113deb3ec6SMatthias Ringwald sm_active_connection = 0; 1112711e6c80SMatthias Ringwald log_info("sm: connection 0x%x released setup context", con_handle); 11133deb3ec6SMatthias Ringwald } 11143deb3ec6SMatthias Ringwald } 11153deb3ec6SMatthias Ringwald 11163deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_auth_req(void){ 11173deb3ec6SMatthias Ringwald int flags = SM_KEYDIST_ID_KEY | SM_KEYDIST_SIGN; 11183deb3ec6SMatthias Ringwald if (sm_auth_req & SM_AUTHREQ_BONDING){ 11193deb3ec6SMatthias Ringwald // encryption information only if bonding requested 11203deb3ec6SMatthias Ringwald flags |= SM_KEYDIST_ENC_KEY; 11213deb3ec6SMatthias Ringwald } 11223deb3ec6SMatthias Ringwald return flags; 11233deb3ec6SMatthias Ringwald } 11243deb3ec6SMatthias Ringwald 11253deb3ec6SMatthias Ringwald static void sm_init_setup(sm_connection_t * sm_conn){ 11263deb3ec6SMatthias Ringwald 11273deb3ec6SMatthias Ringwald // fill in sm setup 11283deb3ec6SMatthias Ringwald sm_reset_tk(); 11293deb3ec6SMatthias Ringwald setup->sm_peer_addr_type = sm_conn->sm_peer_addr_type; 11303deb3ec6SMatthias Ringwald memcpy(setup->sm_peer_address, sm_conn->sm_peer_address, 6); 11313deb3ec6SMatthias Ringwald 11323deb3ec6SMatthias Ringwald // query client for OOB data 11333deb3ec6SMatthias Ringwald int have_oob_data = 0; 11343deb3ec6SMatthias Ringwald if (sm_get_oob_data) { 11353deb3ec6SMatthias Ringwald have_oob_data = (*sm_get_oob_data)(sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, setup->sm_tk); 11363deb3ec6SMatthias Ringwald } 11373deb3ec6SMatthias Ringwald 11383deb3ec6SMatthias Ringwald sm_pairing_packet_t * local_packet; 11393deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 11403deb3ec6SMatthias Ringwald // slave 11413deb3ec6SMatthias Ringwald local_packet = &setup->sm_s_pres; 114215a95bd5SMatthias Ringwald gap_advertisements_get_address(&setup->sm_s_addr_type, setup->sm_s_address); 11433deb3ec6SMatthias Ringwald setup->sm_m_addr_type = sm_conn->sm_peer_addr_type; 11443deb3ec6SMatthias Ringwald memcpy(setup->sm_m_address, sm_conn->sm_peer_address, 6); 11453deb3ec6SMatthias Ringwald } else { 11463deb3ec6SMatthias Ringwald // master 11473deb3ec6SMatthias Ringwald local_packet = &setup->sm_m_preq; 114815a95bd5SMatthias Ringwald gap_advertisements_get_address(&setup->sm_m_addr_type, setup->sm_m_address); 11493deb3ec6SMatthias Ringwald setup->sm_s_addr_type = sm_conn->sm_peer_addr_type; 11503deb3ec6SMatthias Ringwald memcpy(setup->sm_s_address, sm_conn->sm_peer_address, 6); 11513deb3ec6SMatthias Ringwald 11523deb3ec6SMatthias Ringwald int key_distribution_flags = sm_key_distribution_flags_for_auth_req(); 11531ad129beSMatthias Ringwald sm_pairing_packet_set_initiator_key_distribution(setup->sm_m_preq, key_distribution_flags); 11541ad129beSMatthias Ringwald sm_pairing_packet_set_responder_key_distribution(setup->sm_m_preq, key_distribution_flags); 11553deb3ec6SMatthias Ringwald } 11563deb3ec6SMatthias Ringwald 11571ad129beSMatthias Ringwald sm_pairing_packet_set_io_capability(*local_packet, sm_io_capabilities); 11581ad129beSMatthias Ringwald sm_pairing_packet_set_oob_data_flag(*local_packet, have_oob_data); 11591ad129beSMatthias Ringwald sm_pairing_packet_set_auth_req(*local_packet, sm_auth_req); 11601ad129beSMatthias Ringwald sm_pairing_packet_set_max_encryption_key_size(*local_packet, sm_max_encryption_key_size); 11613deb3ec6SMatthias Ringwald } 11623deb3ec6SMatthias Ringwald 11633deb3ec6SMatthias Ringwald static int sm_stk_generation_init(sm_connection_t * sm_conn){ 11643deb3ec6SMatthias Ringwald 11653deb3ec6SMatthias Ringwald sm_pairing_packet_t * remote_packet; 11663deb3ec6SMatthias Ringwald int remote_key_request; 11673deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 116852f9cf63SMatthias Ringwald // slave / responder 11693deb3ec6SMatthias Ringwald remote_packet = &setup->sm_m_preq; 11701ad129beSMatthias Ringwald remote_key_request = sm_pairing_packet_get_responder_key_distribution(setup->sm_m_preq); 11713deb3ec6SMatthias Ringwald } else { 11723deb3ec6SMatthias Ringwald // master / initiator 11733deb3ec6SMatthias Ringwald remote_packet = &setup->sm_s_pres; 11741ad129beSMatthias Ringwald remote_key_request = sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres); 11753deb3ec6SMatthias Ringwald } 11763deb3ec6SMatthias Ringwald 11773deb3ec6SMatthias Ringwald // check key size 11781ad129beSMatthias Ringwald sm_conn->sm_actual_encryption_key_size = sm_calc_actual_encryption_key_size(sm_pairing_packet_get_max_encryption_key_size(*remote_packet)); 11793deb3ec6SMatthias Ringwald if (sm_conn->sm_actual_encryption_key_size == 0) return SM_REASON_ENCRYPTION_KEY_SIZE; 11803deb3ec6SMatthias Ringwald 11813deb3ec6SMatthias Ringwald // decide on STK generation method 11823deb3ec6SMatthias Ringwald sm_setup_tk(); 11833deb3ec6SMatthias Ringwald log_info("SMP: generation method %u", setup->sm_stk_generation_method); 11843deb3ec6SMatthias Ringwald 11853deb3ec6SMatthias Ringwald // check if STK generation method is acceptable by client 11863deb3ec6SMatthias Ringwald if (!sm_validate_stk_generation_method()) return SM_REASON_AUTHENTHICATION_REQUIREMENTS; 11873deb3ec6SMatthias Ringwald 118852f9cf63SMatthias Ringwald // identical to responder 118952f9cf63SMatthias Ringwald sm_setup_key_distribution(remote_key_request); 119052f9cf63SMatthias Ringwald 11913deb3ec6SMatthias Ringwald // JUST WORKS doens't provide authentication 11923deb3ec6SMatthias Ringwald sm_conn->sm_connection_authenticated = setup->sm_stk_generation_method == JUST_WORKS ? 0 : 1; 11933deb3ec6SMatthias Ringwald 11943deb3ec6SMatthias Ringwald return 0; 11953deb3ec6SMatthias Ringwald } 11963deb3ec6SMatthias Ringwald 11973deb3ec6SMatthias Ringwald static void sm_address_resolution_handle_event(address_resolution_event_t event){ 11983deb3ec6SMatthias Ringwald 11993deb3ec6SMatthias Ringwald // cache and reset context 12003deb3ec6SMatthias Ringwald int matched_device_id = sm_address_resolution_test; 12013deb3ec6SMatthias Ringwald address_resolution_mode_t mode = sm_address_resolution_mode; 12023deb3ec6SMatthias Ringwald void * context = sm_address_resolution_context; 12033deb3ec6SMatthias Ringwald 12043deb3ec6SMatthias Ringwald // reset context 12053deb3ec6SMatthias Ringwald sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE; 12063deb3ec6SMatthias Ringwald sm_address_resolution_context = NULL; 12073deb3ec6SMatthias Ringwald sm_address_resolution_test = -1; 1208711e6c80SMatthias Ringwald hci_con_handle_t con_handle = 0; 12093deb3ec6SMatthias Ringwald 12103deb3ec6SMatthias Ringwald sm_connection_t * sm_connection; 12113deb3ec6SMatthias Ringwald uint16_t ediv; 12123deb3ec6SMatthias Ringwald switch (mode){ 12133deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_GENERAL: 12143deb3ec6SMatthias Ringwald break; 12153deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_FOR_CONNECTION: 12163deb3ec6SMatthias Ringwald sm_connection = (sm_connection_t *) context; 1217711e6c80SMatthias Ringwald con_handle = sm_connection->sm_handle; 12183deb3ec6SMatthias Ringwald switch (event){ 12193deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_SUCEEDED: 12203deb3ec6SMatthias Ringwald sm_connection->sm_irk_lookup_state = IRK_LOOKUP_SUCCEEDED; 12213deb3ec6SMatthias Ringwald sm_connection->sm_le_db_index = matched_device_id; 12223deb3ec6SMatthias Ringwald log_info("ADDRESS_RESOLUTION_SUCEEDED, index %d", sm_connection->sm_le_db_index); 12233deb3ec6SMatthias Ringwald if (sm_connection->sm_role) break; 12243deb3ec6SMatthias Ringwald if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break; 12253deb3ec6SMatthias Ringwald sm_connection->sm_security_request_received = 0; 12263deb3ec6SMatthias Ringwald sm_connection->sm_bonding_requested = 0; 12273deb3ec6SMatthias Ringwald le_device_db_encryption_get(sm_connection->sm_le_db_index, &ediv, NULL, NULL, NULL, NULL, NULL); 12283deb3ec6SMatthias Ringwald if (ediv){ 12293deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK; 12303deb3ec6SMatthias Ringwald } else { 12313deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 12323deb3ec6SMatthias Ringwald } 12333deb3ec6SMatthias Ringwald break; 12343deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_FAILED: 12353deb3ec6SMatthias Ringwald sm_connection->sm_irk_lookup_state = IRK_LOOKUP_FAILED; 12363deb3ec6SMatthias Ringwald if (sm_connection->sm_role) break; 12373deb3ec6SMatthias Ringwald if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break; 12383deb3ec6SMatthias Ringwald sm_connection->sm_security_request_received = 0; 12393deb3ec6SMatthias Ringwald sm_connection->sm_bonding_requested = 0; 12403deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 12413deb3ec6SMatthias Ringwald break; 12423deb3ec6SMatthias Ringwald } 12433deb3ec6SMatthias Ringwald break; 12443deb3ec6SMatthias Ringwald default: 12453deb3ec6SMatthias Ringwald break; 12463deb3ec6SMatthias Ringwald } 12473deb3ec6SMatthias Ringwald 12483deb3ec6SMatthias Ringwald switch (event){ 12493deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_SUCEEDED: 1250711e6c80SMatthias Ringwald sm_notify_client_index(SM_EVENT_IDENTITY_RESOLVING_SUCCEEDED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address, matched_device_id); 12513deb3ec6SMatthias Ringwald break; 12523deb3ec6SMatthias Ringwald case ADDRESS_RESOLUTION_FAILED: 1253711e6c80SMatthias Ringwald sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_FAILED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address); 12543deb3ec6SMatthias Ringwald break; 12553deb3ec6SMatthias Ringwald } 12563deb3ec6SMatthias Ringwald } 12573deb3ec6SMatthias Ringwald 12583deb3ec6SMatthias Ringwald static void sm_key_distribution_handle_all_received(sm_connection_t * sm_conn){ 12593deb3ec6SMatthias Ringwald 12603deb3ec6SMatthias Ringwald int le_db_index = -1; 12613deb3ec6SMatthias Ringwald 12623deb3ec6SMatthias Ringwald // lookup device based on IRK 12633deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_INFORMATION){ 12643deb3ec6SMatthias Ringwald int i; 12653deb3ec6SMatthias Ringwald for (i=0; i < le_device_db_count(); i++){ 12663deb3ec6SMatthias Ringwald sm_key_t irk; 12673deb3ec6SMatthias Ringwald bd_addr_t address; 12683deb3ec6SMatthias Ringwald int address_type; 12693deb3ec6SMatthias Ringwald le_device_db_info(i, &address_type, address, irk); 12703deb3ec6SMatthias Ringwald if (memcmp(irk, setup->sm_peer_irk, 16) == 0){ 12713deb3ec6SMatthias Ringwald log_info("sm: device found for IRK, updating"); 12723deb3ec6SMatthias Ringwald le_db_index = i; 12733deb3ec6SMatthias Ringwald break; 12743deb3ec6SMatthias Ringwald } 12753deb3ec6SMatthias Ringwald } 12763deb3ec6SMatthias Ringwald } 12773deb3ec6SMatthias Ringwald 12783deb3ec6SMatthias Ringwald // if not found, lookup via public address if possible 12793deb3ec6SMatthias Ringwald log_info("sm peer addr type %u, peer addres %s", setup->sm_peer_addr_type, bd_addr_to_str(setup->sm_peer_address)); 12803deb3ec6SMatthias Ringwald if (le_db_index < 0 && setup->sm_peer_addr_type == BD_ADDR_TYPE_LE_PUBLIC){ 12813deb3ec6SMatthias Ringwald int i; 12823deb3ec6SMatthias Ringwald for (i=0; i < le_device_db_count(); i++){ 12833deb3ec6SMatthias Ringwald bd_addr_t address; 12843deb3ec6SMatthias Ringwald int address_type; 12853deb3ec6SMatthias Ringwald le_device_db_info(i, &address_type, address, NULL); 12863deb3ec6SMatthias Ringwald log_info("device %u, sm peer addr type %u, peer addres %s", i, address_type, bd_addr_to_str(address)); 12873deb3ec6SMatthias Ringwald if (address_type == BD_ADDR_TYPE_LE_PUBLIC && memcmp(address, setup->sm_peer_address, 6) == 0){ 12883deb3ec6SMatthias Ringwald log_info("sm: device found for public address, updating"); 12893deb3ec6SMatthias Ringwald le_db_index = i; 12903deb3ec6SMatthias Ringwald break; 12913deb3ec6SMatthias Ringwald } 12923deb3ec6SMatthias Ringwald } 12933deb3ec6SMatthias Ringwald } 12943deb3ec6SMatthias Ringwald 12953deb3ec6SMatthias Ringwald // if not found, add to db 12963deb3ec6SMatthias Ringwald if (le_db_index < 0) { 12973deb3ec6SMatthias Ringwald le_db_index = le_device_db_add(setup->sm_peer_addr_type, setup->sm_peer_address, setup->sm_peer_irk); 12983deb3ec6SMatthias Ringwald } 12993deb3ec6SMatthias Ringwald 13003deb3ec6SMatthias Ringwald if (le_db_index >= 0){ 13013deb3ec6SMatthias Ringwald le_device_db_local_counter_set(le_db_index, 0); 13023deb3ec6SMatthias Ringwald 13033deb3ec6SMatthias Ringwald // store local CSRK 13043deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){ 13053deb3ec6SMatthias Ringwald log_info("sm: store local CSRK"); 13063deb3ec6SMatthias Ringwald le_device_db_local_csrk_set(le_db_index, setup->sm_local_csrk); 13073deb3ec6SMatthias Ringwald le_device_db_local_counter_set(le_db_index, 0); 13083deb3ec6SMatthias Ringwald } 13093deb3ec6SMatthias Ringwald 13103deb3ec6SMatthias Ringwald // store remote CSRK 13113deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){ 13123deb3ec6SMatthias Ringwald log_info("sm: store remote CSRK"); 13133deb3ec6SMatthias Ringwald le_device_db_remote_csrk_set(le_db_index, setup->sm_peer_csrk); 13143deb3ec6SMatthias Ringwald le_device_db_remote_counter_set(le_db_index, 0); 13153deb3ec6SMatthias Ringwald } 13163deb3ec6SMatthias Ringwald 13173deb3ec6SMatthias Ringwald // store encryption information 13183deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION 13193deb3ec6SMatthias Ringwald && setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_MASTER_IDENTIFICATION){ 13203deb3ec6SMatthias Ringwald log_info("sm: set encryption information (key size %u, authenticatd %u)", sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated); 13213deb3ec6SMatthias Ringwald le_device_db_encryption_set(le_db_index, setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk, 13223deb3ec6SMatthias Ringwald sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated, sm_conn->sm_connection_authorization_state == AUTHORIZATION_GRANTED); 13233deb3ec6SMatthias Ringwald } 13243deb3ec6SMatthias Ringwald } 13253deb3ec6SMatthias Ringwald 13263deb3ec6SMatthias Ringwald // keep le_db_index 13273deb3ec6SMatthias Ringwald sm_conn->sm_le_db_index = le_db_index; 13283deb3ec6SMatthias Ringwald } 13293deb3ec6SMatthias Ringwald 1330688a08f9SMatthias Ringwald static void sm_pairing_error(sm_connection_t * sm_conn, uint8_t reason){ 1331688a08f9SMatthias Ringwald setup->sm_pairing_failed_reason = reason; 1332688a08f9SMatthias Ringwald sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED; 1333688a08f9SMatthias Ringwald } 1334688a08f9SMatthias Ringwald 1335688a08f9SMatthias Ringwald static inline void sm_pdu_received_in_wrong_state(sm_connection_t * sm_conn){ 1336688a08f9SMatthias Ringwald sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON); 1337688a08f9SMatthias Ringwald } 1338688a08f9SMatthias Ringwald 13399af0f475SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 1340688a08f9SMatthias Ringwald 1341dc300847SMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn); 1342dc300847SMatthias Ringwald 1343688a08f9SMatthias Ringwald static void sm_sc_state_after_receiving_random(sm_connection_t * sm_conn){ 1344688a08f9SMatthias Ringwald if (sm_conn->sm_role){ 1345688a08f9SMatthias Ringwald // Responder 1346688a08f9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM; 1347688a08f9SMatthias Ringwald } else { 1348688a08f9SMatthias Ringwald // Initiator role 1349688a08f9SMatthias Ringwald switch (setup->sm_stk_generation_method){ 1350688a08f9SMatthias Ringwald case JUST_WORKS: 1351dc300847SMatthias Ringwald sm_sc_prepare_dhkey_check(sm_conn); 1352688a08f9SMatthias Ringwald break; 1353688a08f9SMatthias Ringwald 1354688a08f9SMatthias Ringwald case NK_BOTH_INPUT: { 1355688a08f9SMatthias Ringwald // calc Va if numeric comparison 1356688a08f9SMatthias Ringwald // TODO: use AES Engine to calculate g2 1357688a08f9SMatthias Ringwald uint8_t value[32]; 1358688a08f9SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.X, value, sizeof(value)); 1359688a08f9SMatthias Ringwald uint32_t va = g2(value, setup->sm_peer_qx, setup->sm_local_nonce, setup->sm_peer_nonce) % 1000000; 1360688a08f9SMatthias Ringwald big_endian_store_32(setup->sm_tk, 12, va); 1361688a08f9SMatthias Ringwald sm_trigger_user_response(sm_conn); 1362688a08f9SMatthias Ringwald break; 1363688a08f9SMatthias Ringwald } 1364688a08f9SMatthias Ringwald case PK_INIT_INPUT: 1365688a08f9SMatthias Ringwald case PK_RESP_INPUT: 1366688a08f9SMatthias Ringwald case OK_BOTH_INPUT: 1367688a08f9SMatthias Ringwald if (setup->sm_passkey_bit < 20) { 1368688a08f9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION; 1369688a08f9SMatthias Ringwald } else { 1370dc300847SMatthias Ringwald sm_sc_prepare_dhkey_check(sm_conn); 1371688a08f9SMatthias Ringwald } 1372688a08f9SMatthias Ringwald break; 1373688a08f9SMatthias Ringwald case OOB: 1374688a08f9SMatthias Ringwald // TODO: implement SC OOB 1375688a08f9SMatthias Ringwald break; 1376688a08f9SMatthias Ringwald } 1377688a08f9SMatthias Ringwald } 1378688a08f9SMatthias Ringwald } 1379688a08f9SMatthias Ringwald 1380aec94140SMatthias Ringwald static uint8_t sm_sc_cmac_get_byte(uint16_t offset){ 1381aec94140SMatthias Ringwald return sm_cmac_sc_buffer[offset]; 1382aec94140SMatthias Ringwald } 1383688a08f9SMatthias Ringwald 1384aec94140SMatthias Ringwald static void sm_sc_cmac_done(uint8_t * hash){ 1385688a08f9SMatthias Ringwald log_info("sm_sc_cmac_done: "); 1386688a08f9SMatthias Ringwald log_info_hexdump(hash, 16); 1387688a08f9SMatthias Ringwald 1388aec94140SMatthias Ringwald switch (sm_cmac_connection->sm_engine_state){ 1389aec94140SMatthias Ringwald case SM_SC_W4_CMAC_FOR_CONFIRMATION: 1390aec94140SMatthias Ringwald memcpy(setup->sm_local_confirm, hash, 16); 1391aec94140SMatthias Ringwald sm_cmac_connection->sm_engine_state = SM_SC_SEND_CONFIRMATION; 1392aec94140SMatthias Ringwald break; 1393688a08f9SMatthias Ringwald case SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION: 1394688a08f9SMatthias Ringwald // check 1395688a08f9SMatthias Ringwald if (0 != memcmp(hash, setup->sm_peer_confirm, 16)){ 1396688a08f9SMatthias Ringwald sm_pairing_error(sm_cmac_connection, SM_REASON_CONFIRM_VALUE_FAILED); 1397688a08f9SMatthias Ringwald break; 1398688a08f9SMatthias Ringwald } 1399688a08f9SMatthias Ringwald sm_sc_state_after_receiving_random(sm_cmac_connection); 1400688a08f9SMatthias Ringwald break; 1401*27163002SMatthias Ringwald case SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK: 1402*27163002SMatthias Ringwald memcpy(setup->sm_local_dhkey_check, hash, 16); 1403*27163002SMatthias Ringwald sm_cmac_connection->sm_engine_state = SM_SC_SEND_DHKEY_CHECK_COMMAND; 1404*27163002SMatthias Ringwald break; 1405aec94140SMatthias Ringwald default: 1406aec94140SMatthias Ringwald log_error("sm_sc_cmac_done in state %u", sm_cmac_connection->sm_engine_state); 1407aec94140SMatthias Ringwald break; 1408aec94140SMatthias Ringwald } 1409aec94140SMatthias Ringwald sm_cmac_connection = 0; 1410aec94140SMatthias Ringwald sm_run(); 1411aec94140SMatthias Ringwald } 1412aec94140SMatthias Ringwald 1413688a08f9SMatthias 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){ 1414dc300847SMatthias Ringwald const uint16_t message_len = 65; 1415aec94140SMatthias Ringwald sm_cmac_connection = sm_conn; 1416aec94140SMatthias Ringwald memcpy(sm_cmac_sc_buffer, u, 32); 1417aec94140SMatthias Ringwald memcpy(sm_cmac_sc_buffer+32, v, 32); 1418aec94140SMatthias Ringwald sm_cmac_sc_buffer[64] = z; 1419aec94140SMatthias Ringwald log_info("f4 key"); 1420aec94140SMatthias Ringwald log_info_hexdump(x, 16); 1421aec94140SMatthias Ringwald log_info("f4 message"); 1422dc300847SMatthias Ringwald log_info_hexdump(sm_cmac_sc_buffer, message_len); 1423dc300847SMatthias Ringwald sm_cmac_general_start(x, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done); 1424aec94140SMatthias Ringwald } 1425aec94140SMatthias Ringwald 1426dc300847SMatthias Ringwald // f6(W, N1, N2, R, IOcap, A1, A2) = AES-CMACW (N1 || N2 || R || IOcap || A1 || A2 1427dc300847SMatthias Ringwald // - W is 128 bits 1428dc300847SMatthias Ringwald // - N1 is 128 bits 1429dc300847SMatthias Ringwald // - N2 is 128 bits 1430dc300847SMatthias Ringwald // - R is 128 bits 1431dc300847SMatthias Ringwald // - IOcap is 24 bits 1432dc300847SMatthias Ringwald // - A1 is 56 bits 1433dc300847SMatthias Ringwald // - A2 is 56 bits 1434dc300847SMatthias Ringwald static void f6(sm_key_t res, 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){ 1435dc300847SMatthias Ringwald uint8_t buffer[65]; 1436dc300847SMatthias Ringwald memcpy(buffer, n1, 16); 1437dc300847SMatthias Ringwald memcpy(buffer+16, n2, 16); 1438dc300847SMatthias Ringwald memcpy(buffer+32, r, 16); 1439dc300847SMatthias Ringwald memcpy(buffer+48, io_cap, 3); 1440dc300847SMatthias Ringwald memcpy(buffer+51, a1, 7); 1441dc300847SMatthias Ringwald memcpy(buffer+58, a2, 7); 1442dc300847SMatthias Ringwald log_info("f6 key"); 1443dc300847SMatthias Ringwald log_info_hexdump(w, 16); 1444dc300847SMatthias Ringwald log_info("f6 message"); 1445dc300847SMatthias Ringwald log_info_hexdump(buffer, sizeof(buffer)); 1446dc300847SMatthias Ringwald aes_cmac(res, w, buffer,sizeof(buffer)); 1447dc300847SMatthias Ringwald log_info("f6 result"); 1448dc300847SMatthias Ringwald log_info_hexdump(res, 16); 1449dc300847SMatthias Ringwald } 1450dc300847SMatthias Ringwald 1451*27163002SMatthias 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){ 1452dc300847SMatthias Ringwald const uint16_t message_len = 65; 1453*27163002SMatthias Ringwald sm_cmac_connection = sm_conn; 1454dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer, n1, 16); 1455dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer+16, n2, 16); 1456dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer+32, r, 16); 1457dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer+48, io_cap, 3); 1458dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer+51, a1, 7); 1459dc300847SMatthias Ringwald memcpy(sm_cmac_sc_buffer+58, a2, 7); 1460dc300847SMatthias Ringwald log_info("f6 key"); 1461dc300847SMatthias Ringwald log_info_hexdump(w, 16); 1462dc300847SMatthias Ringwald log_info("f6 message"); 1463dc300847SMatthias Ringwald log_info_hexdump(sm_cmac_sc_buffer, message_len); 1464dc300847SMatthias Ringwald sm_cmac_general_start(w, 65, &sm_sc_cmac_get_byte, &sm_sc_cmac_done); 1465dc300847SMatthias Ringwald } 1466dc300847SMatthias Ringwald 1467aec94140SMatthias Ringwald static void sm_sc_calculate_local_confirm(sm_connection_t * sm_conn){ 14689af0f475SMatthias Ringwald uint8_t z = 0; 14699af0f475SMatthias Ringwald if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){ 14709af0f475SMatthias Ringwald // some form of passkey 14719af0f475SMatthias Ringwald uint32_t pk = big_endian_read_32(setup->sm_tk, 12); 14729af0f475SMatthias Ringwald z = 0x80 | ((pk >> setup->sm_passkey_bit) & 1); 14739af0f475SMatthias Ringwald setup->sm_passkey_bit++; 14749af0f475SMatthias Ringwald } 14759af0f475SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 1476688a08f9SMatthias Ringwald uint8_t local_qx[32]; 1477688a08f9SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.X, local_qx, sizeof(local_qx)); 14789af0f475SMatthias Ringwald #endif 1479688a08f9SMatthias Ringwald f4_engine(sm_conn, local_qx, setup->sm_peer_qx, setup->sm_local_nonce, z); 14809af0f475SMatthias Ringwald } 1481688a08f9SMatthias Ringwald 1482688a08f9SMatthias Ringwald static void sm_sc_calculate_remote_confirm(sm_connection_t * sm_conn){ 1483688a08f9SMatthias Ringwald uint8_t z = 0; 1484688a08f9SMatthias Ringwald if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){ 1485688a08f9SMatthias Ringwald // some form of passkey 1486688a08f9SMatthias Ringwald uint32_t pk = big_endian_read_32(setup->sm_tk, 12); 1487688a08f9SMatthias Ringwald // sm_passkey_bit was increased before sending confirm value 1488688a08f9SMatthias Ringwald z = 0x80 | ((pk >> (setup->sm_passkey_bit-1)) & 1); 1489688a08f9SMatthias Ringwald } 1490688a08f9SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 1491688a08f9SMatthias Ringwald uint8_t local_qx[32]; 1492688a08f9SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.X, local_qx, sizeof(local_qx)); 1493688a08f9SMatthias Ringwald #endif 1494688a08f9SMatthias Ringwald f4_engine(sm_conn, setup->sm_peer_qx, local_qx, setup->sm_peer_nonce, z); 1495688a08f9SMatthias Ringwald } 1496688a08f9SMatthias Ringwald 1497e083ca23SMatthias Ringwald static void sm_sc_calculate_dhkey(sm_key256_t dhkey){ 1498e083ca23SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 1499e083ca23SMatthias Ringwald // da * Pb 1500e083ca23SMatthias Ringwald mbedtls_ecp_group grp; 1501e083ca23SMatthias Ringwald mbedtls_ecp_group_init( &grp ); 1502e083ca23SMatthias Ringwald mbedtls_ecp_group_load(&grp, MBEDTLS_ECP_DP_SECP256R1); 1503e083ca23SMatthias Ringwald mbedtls_ecp_point Q; 1504e083ca23SMatthias Ringwald mbedtls_ecp_point_init( &Q ); 1505e083ca23SMatthias Ringwald mbedtls_mpi_read_binary(&Q.X, setup->sm_peer_qx, 32); 1506e083ca23SMatthias Ringwald mbedtls_mpi_read_binary(&Q.Y, setup->sm_peer_qy, 32); 1507e083ca23SMatthias Ringwald mbedtls_mpi_read_string(&Q.Z, 16, "1" ); 1508e083ca23SMatthias Ringwald mbedtls_ecp_point DH; 1509e083ca23SMatthias Ringwald mbedtls_ecp_point_init( &DH ); 1510e083ca23SMatthias Ringwald mbedtls_ecp_mul(&grp, &DH, &le_keypair.d, &Q, NULL, NULL); 1511e083ca23SMatthias Ringwald mbedtls_mpi_write_binary(&DH.X, dhkey, 32); 1512e083ca23SMatthias Ringwald #endif 1513e083ca23SMatthias Ringwald log_info("dhkey"); 1514e083ca23SMatthias Ringwald log_info_hexdump(dhkey, 32); 1515e083ca23SMatthias Ringwald } 1516e083ca23SMatthias Ringwald 1517dc300847SMatthias Ringwald static void sm_sc_calculate_f5_for_dhkey_check(sm_connection_t * sm_conn){ 1518dc300847SMatthias Ringwald 1519dc300847SMatthias Ringwald // calculate DHKEY 1520dc300847SMatthias Ringwald sm_key256_t dhkey; 1521dc300847SMatthias Ringwald sm_sc_calculate_dhkey(dhkey); 1522dc300847SMatthias Ringwald 1523dc300847SMatthias Ringwald // calculate LTK + MacKey 1524dc300847SMatthias Ringwald sm_key256_t ltk_mackey; 1525dc300847SMatthias Ringwald sm_key56_t bd_addr_master, bd_addr_slave; 1526dc300847SMatthias Ringwald bd_addr_master[0] = setup->sm_m_addr_type; 1527dc300847SMatthias Ringwald bd_addr_slave[0] = setup->sm_s_addr_type; 1528dc300847SMatthias Ringwald memcpy(&bd_addr_master[1], setup->sm_m_address, 6); 1529dc300847SMatthias Ringwald memcpy(&bd_addr_slave[1], setup->sm_s_address, 6); 1530dc300847SMatthias Ringwald if (sm_conn->sm_role){ 1531dc300847SMatthias Ringwald // responder 1532dc300847SMatthias Ringwald f5(ltk_mackey, dhkey, setup->sm_peer_nonce, setup->sm_local_nonce, bd_addr_master, bd_addr_slave); 1533dc300847SMatthias Ringwald } else { 1534dc300847SMatthias Ringwald // initiator 1535dc300847SMatthias Ringwald f5(ltk_mackey, dhkey, setup->sm_local_nonce, setup->sm_peer_nonce, bd_addr_master, bd_addr_slave); 1536dc300847SMatthias Ringwald } 1537dc300847SMatthias Ringwald // store LTK 1538dc300847SMatthias Ringwald memcpy(setup->sm_ltk, <k_mackey[16], 16); 1539dc300847SMatthias Ringwald 1540dc300847SMatthias Ringwald // store macckey 1541dc300847SMatthias Ringwald memcpy(setup->sm_mackey, <k_mackey[0], 16); 1542dc300847SMatthias Ringwald } 1543dc300847SMatthias Ringwald 1544dc300847SMatthias Ringwald static void sm_sc_calculate_f6_for_dhkey_check(sm_connection_t * sm_conn){ 1545dc300847SMatthias Ringwald // calculate DHKCheck 1546dc300847SMatthias Ringwald sm_key56_t bd_addr_master, bd_addr_slave; 1547dc300847SMatthias Ringwald bd_addr_master[0] = setup->sm_m_addr_type; 1548dc300847SMatthias Ringwald bd_addr_slave[0] = setup->sm_s_addr_type; 1549dc300847SMatthias Ringwald memcpy(&bd_addr_master[1], setup->sm_m_address, 6); 1550dc300847SMatthias Ringwald memcpy(&bd_addr_slave[1], setup->sm_s_address, 6); 1551dc300847SMatthias Ringwald uint8_t iocap_a[3]; 1552dc300847SMatthias Ringwald iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq); 1553dc300847SMatthias Ringwald iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq); 1554dc300847SMatthias Ringwald iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq); 1555dc300847SMatthias Ringwald uint8_t iocap_b[3]; 1556dc300847SMatthias Ringwald iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres); 1557dc300847SMatthias Ringwald iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres); 1558dc300847SMatthias Ringwald iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres); 1559dc300847SMatthias Ringwald if (sm_conn->sm_role){ 1560dc300847SMatthias Ringwald // responder 1561*27163002SMatthias 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); 1562dc300847SMatthias Ringwald } else { 1563dc300847SMatthias Ringwald // initiator 1564*27163002SMatthias 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); 1565dc300847SMatthias Ringwald } 1566dc300847SMatthias Ringwald } 1567dc300847SMatthias Ringwald 1568dc300847SMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn){ 1569*27163002SMatthias Ringwald 1570*27163002SMatthias Ringwald // TODO: use AES CMAC Engine 1571dc300847SMatthias Ringwald sm_sc_calculate_f5_for_dhkey_check(sm_conn); 1572*27163002SMatthias Ringwald 1573*27163002SMatthias Ringwald // second part 1574*27163002SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK; 1575dc300847SMatthias Ringwald } 1576dc300847SMatthias Ringwald 15779af0f475SMatthias Ringwald #endif 15789af0f475SMatthias Ringwald 15793deb3ec6SMatthias Ringwald static void sm_run(void){ 15803deb3ec6SMatthias Ringwald 1581665d90f2SMatthias Ringwald btstack_linked_list_iterator_t it; 15823deb3ec6SMatthias Ringwald 15833deb3ec6SMatthias Ringwald // assert that we can send at least commands 15843deb3ec6SMatthias Ringwald if (!hci_can_send_command_packet_now()) return; 15853deb3ec6SMatthias Ringwald 15863deb3ec6SMatthias Ringwald // 15873deb3ec6SMatthias Ringwald // non-connection related behaviour 15883deb3ec6SMatthias Ringwald // 15893deb3ec6SMatthias Ringwald 15903deb3ec6SMatthias Ringwald // distributed key generation 15913deb3ec6SMatthias Ringwald switch (dkg_state){ 15923deb3ec6SMatthias Ringwald case DKG_CALC_IRK: 15933deb3ec6SMatthias Ringwald // already busy? 15943deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_IDLE) { 15953deb3ec6SMatthias Ringwald // IRK = d1(IR, 1, 0) 15963deb3ec6SMatthias Ringwald sm_key_t d1_prime; 15973deb3ec6SMatthias Ringwald sm_d1_d_prime(1, 0, d1_prime); // plaintext 15983deb3ec6SMatthias Ringwald dkg_next_state(); 15993deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_ir, d1_prime, NULL); 16003deb3ec6SMatthias Ringwald return; 16013deb3ec6SMatthias Ringwald } 16023deb3ec6SMatthias Ringwald break; 16033deb3ec6SMatthias Ringwald case DKG_CALC_DHK: 16043deb3ec6SMatthias Ringwald // already busy? 16053deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_IDLE) { 16063deb3ec6SMatthias Ringwald // DHK = d1(IR, 3, 0) 16073deb3ec6SMatthias Ringwald sm_key_t d1_prime; 16083deb3ec6SMatthias Ringwald sm_d1_d_prime(3, 0, d1_prime); // plaintext 16093deb3ec6SMatthias Ringwald dkg_next_state(); 16103deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_ir, d1_prime, NULL); 16113deb3ec6SMatthias Ringwald return; 16123deb3ec6SMatthias Ringwald } 16133deb3ec6SMatthias Ringwald break; 16143deb3ec6SMatthias Ringwald default: 16153deb3ec6SMatthias Ringwald break; 16163deb3ec6SMatthias Ringwald } 16173deb3ec6SMatthias Ringwald 16183deb3ec6SMatthias Ringwald // random address updates 16193deb3ec6SMatthias Ringwald switch (rau_state){ 16203deb3ec6SMatthias Ringwald case RAU_GET_RANDOM: 16213deb3ec6SMatthias Ringwald rau_next_state(); 16223deb3ec6SMatthias Ringwald sm_random_start(NULL); 16233deb3ec6SMatthias Ringwald return; 16243deb3ec6SMatthias Ringwald case RAU_GET_ENC: 16253deb3ec6SMatthias Ringwald // already busy? 16263deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_IDLE) { 16273deb3ec6SMatthias Ringwald sm_key_t r_prime; 16283deb3ec6SMatthias Ringwald sm_ah_r_prime(sm_random_address, r_prime); 16293deb3ec6SMatthias Ringwald rau_next_state(); 16303deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_irk, r_prime, NULL); 16313deb3ec6SMatthias Ringwald return; 16323deb3ec6SMatthias Ringwald } 16333deb3ec6SMatthias Ringwald break; 16343deb3ec6SMatthias Ringwald case RAU_SET_ADDRESS: 16353deb3ec6SMatthias Ringwald log_info("New random address: %s", bd_addr_to_str(sm_random_address)); 16363deb3ec6SMatthias Ringwald rau_state = RAU_IDLE; 16373deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_set_random_address, sm_random_address); 16383deb3ec6SMatthias Ringwald return; 16393deb3ec6SMatthias Ringwald default: 16403deb3ec6SMatthias Ringwald break; 16413deb3ec6SMatthias Ringwald } 16423deb3ec6SMatthias Ringwald 16433deb3ec6SMatthias Ringwald // CMAC 16443deb3ec6SMatthias Ringwald switch (sm_cmac_state){ 16453deb3ec6SMatthias Ringwald case CMAC_CALC_SUBKEYS: 16463deb3ec6SMatthias Ringwald case CMAC_CALC_MI: 16473deb3ec6SMatthias Ringwald case CMAC_CALC_MLAST: 16483deb3ec6SMatthias Ringwald // already busy? 16493deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 16503deb3ec6SMatthias Ringwald sm_cmac_handle_aes_engine_ready(); 16513deb3ec6SMatthias Ringwald return; 16523deb3ec6SMatthias Ringwald default: 16533deb3ec6SMatthias Ringwald break; 16543deb3ec6SMatthias Ringwald } 16553deb3ec6SMatthias Ringwald 16563deb3ec6SMatthias Ringwald // CSRK Lookup 16573deb3ec6SMatthias Ringwald // -- if csrk lookup ready, find connection that require csrk lookup 16583deb3ec6SMatthias Ringwald if (sm_address_resolution_idle()){ 16593deb3ec6SMatthias Ringwald hci_connections_get_iterator(&it); 1660665d90f2SMatthias Ringwald while(btstack_linked_list_iterator_has_next(&it)){ 1661665d90f2SMatthias Ringwald hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it); 16623deb3ec6SMatthias Ringwald sm_connection_t * sm_connection = &hci_connection->sm_connection; 16633deb3ec6SMatthias Ringwald if (sm_connection->sm_irk_lookup_state == IRK_LOOKUP_W4_READY){ 16643deb3ec6SMatthias Ringwald // and start lookup 16653deb3ec6SMatthias 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); 16663deb3ec6SMatthias Ringwald sm_connection->sm_irk_lookup_state = IRK_LOOKUP_STARTED; 16673deb3ec6SMatthias Ringwald break; 16683deb3ec6SMatthias Ringwald } 16693deb3ec6SMatthias Ringwald } 16703deb3ec6SMatthias Ringwald } 16713deb3ec6SMatthias Ringwald 16723deb3ec6SMatthias Ringwald // -- if csrk lookup ready, resolved addresses for received addresses 16733deb3ec6SMatthias Ringwald if (sm_address_resolution_idle()) { 1674665d90f2SMatthias Ringwald if (!btstack_linked_list_empty(&sm_address_resolution_general_queue)){ 16753deb3ec6SMatthias Ringwald sm_lookup_entry_t * entry = (sm_lookup_entry_t *) sm_address_resolution_general_queue; 1676665d90f2SMatthias Ringwald btstack_linked_list_remove(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry); 16773deb3ec6SMatthias Ringwald sm_address_resolution_start_lookup(entry->address_type, 0, entry->address, ADDRESS_RESOLUTION_GENERAL, NULL); 16783deb3ec6SMatthias Ringwald btstack_memory_sm_lookup_entry_free(entry); 16793deb3ec6SMatthias Ringwald } 16803deb3ec6SMatthias Ringwald } 16813deb3ec6SMatthias Ringwald 16823deb3ec6SMatthias Ringwald // -- Continue with CSRK device lookup by public or resolvable private address 16833deb3ec6SMatthias Ringwald if (!sm_address_resolution_idle()){ 16843deb3ec6SMatthias Ringwald log_info("LE Device Lookup: device %u/%u", sm_address_resolution_test, le_device_db_count()); 16853deb3ec6SMatthias Ringwald while (sm_address_resolution_test < le_device_db_count()){ 16863deb3ec6SMatthias Ringwald int addr_type; 16873deb3ec6SMatthias Ringwald bd_addr_t addr; 16883deb3ec6SMatthias Ringwald sm_key_t irk; 16893deb3ec6SMatthias Ringwald le_device_db_info(sm_address_resolution_test, &addr_type, addr, irk); 16903deb3ec6SMatthias Ringwald log_info("device type %u, addr: %s", addr_type, bd_addr_to_str(addr)); 16913deb3ec6SMatthias Ringwald 16923deb3ec6SMatthias Ringwald if (sm_address_resolution_addr_type == addr_type && memcmp(addr, sm_address_resolution_address, 6) == 0){ 16933deb3ec6SMatthias Ringwald log_info("LE Device Lookup: found CSRK by { addr_type, address} "); 16943deb3ec6SMatthias Ringwald sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED); 16953deb3ec6SMatthias Ringwald break; 16963deb3ec6SMatthias Ringwald } 16973deb3ec6SMatthias Ringwald 16983deb3ec6SMatthias Ringwald if (sm_address_resolution_addr_type == 0){ 16993deb3ec6SMatthias Ringwald sm_address_resolution_test++; 17003deb3ec6SMatthias Ringwald continue; 17013deb3ec6SMatthias Ringwald } 17023deb3ec6SMatthias Ringwald 17033deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 17043deb3ec6SMatthias Ringwald 17053deb3ec6SMatthias Ringwald log_info("LE Device Lookup: calculate AH"); 17068314c363SMatthias Ringwald log_info_key("IRK", irk); 17073deb3ec6SMatthias Ringwald 17083deb3ec6SMatthias Ringwald sm_key_t r_prime; 17093deb3ec6SMatthias Ringwald sm_ah_r_prime(sm_address_resolution_address, r_prime); 17103deb3ec6SMatthias Ringwald sm_address_resolution_ah_calculation_active = 1; 17113deb3ec6SMatthias Ringwald sm_aes128_start(irk, r_prime, sm_address_resolution_context); // keep context 17123deb3ec6SMatthias Ringwald return; 17133deb3ec6SMatthias Ringwald } 17143deb3ec6SMatthias Ringwald 17153deb3ec6SMatthias Ringwald if (sm_address_resolution_test >= le_device_db_count()){ 17163deb3ec6SMatthias Ringwald log_info("LE Device Lookup: not found"); 17173deb3ec6SMatthias Ringwald sm_address_resolution_handle_event(ADDRESS_RESOLUTION_FAILED); 17183deb3ec6SMatthias Ringwald } 17193deb3ec6SMatthias Ringwald } 17203deb3ec6SMatthias Ringwald 17213deb3ec6SMatthias Ringwald 17223deb3ec6SMatthias Ringwald // 17233deb3ec6SMatthias Ringwald // active connection handling 17243deb3ec6SMatthias Ringwald // -- use loop to handle next connection if lock on setup context is released 17253deb3ec6SMatthias Ringwald 17263deb3ec6SMatthias Ringwald while (1) { 17273deb3ec6SMatthias Ringwald 17283deb3ec6SMatthias Ringwald // Find connections that requires setup context and make active if no other is locked 17293deb3ec6SMatthias Ringwald hci_connections_get_iterator(&it); 1730665d90f2SMatthias Ringwald while(!sm_active_connection && btstack_linked_list_iterator_has_next(&it)){ 1731665d90f2SMatthias Ringwald hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it); 17323deb3ec6SMatthias Ringwald sm_connection_t * sm_connection = &hci_connection->sm_connection; 17333deb3ec6SMatthias Ringwald // - if no connection locked and we're ready/waiting for setup context, fetch it and start 17343deb3ec6SMatthias Ringwald int done = 1; 17353deb3ec6SMatthias Ringwald int err; 17363deb3ec6SMatthias Ringwald int encryption_key_size; 17373deb3ec6SMatthias Ringwald int authenticated; 17383deb3ec6SMatthias Ringwald int authorized; 17393deb3ec6SMatthias Ringwald switch (sm_connection->sm_engine_state) { 17403deb3ec6SMatthias Ringwald case SM_RESPONDER_SEND_SECURITY_REQUEST: 17413deb3ec6SMatthias Ringwald // send packet if possible, 1742adbe29e8SMatthias Ringwald if (l2cap_can_send_fixed_channel_packet_now(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)){ 1743b170b20fSMatthias Ringwald const uint8_t buffer[2] = { SM_CODE_SECURITY_REQUEST, SM_AUTHREQ_BONDING}; 17443deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_REQUEST; 17453deb3ec6SMatthias Ringwald l2cap_send_connectionless(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 1746b170b20fSMatthias Ringwald } else { 1747b170b20fSMatthias Ringwald l2cap_request_can_send_fix_channel_now_event(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL); 17483deb3ec6SMatthias Ringwald } 17493deb3ec6SMatthias Ringwald // don't lock setup context yet 17503deb3ec6SMatthias Ringwald done = 0; 17513deb3ec6SMatthias Ringwald break; 17523deb3ec6SMatthias Ringwald case SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED: 17533deb3ec6SMatthias Ringwald sm_init_setup(sm_connection); 17543deb3ec6SMatthias Ringwald // recover pairing request 17553deb3ec6SMatthias Ringwald memcpy(&setup->sm_m_preq, &sm_connection->sm_m_preq, sizeof(sm_pairing_packet_t)); 17563deb3ec6SMatthias Ringwald err = sm_stk_generation_init(sm_connection); 17573deb3ec6SMatthias Ringwald if (err){ 17583deb3ec6SMatthias Ringwald setup->sm_pairing_failed_reason = err; 17593deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED; 17603deb3ec6SMatthias Ringwald break; 17613deb3ec6SMatthias Ringwald } 17623deb3ec6SMatthias Ringwald sm_timeout_start(sm_connection); 17633deb3ec6SMatthias Ringwald // generate random number first, if we need to show passkey 17643deb3ec6SMatthias Ringwald if (setup->sm_stk_generation_method == PK_INIT_INPUT){ 17653deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_PH2_GET_RANDOM_TK; 17663deb3ec6SMatthias Ringwald break; 17673deb3ec6SMatthias Ringwald } 17683deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE; 17693deb3ec6SMatthias Ringwald break; 17703deb3ec6SMatthias Ringwald case SM_INITIATOR_PH0_HAS_LTK: 17713deb3ec6SMatthias Ringwald // fetch data from device db - incl. authenticated/authorized/key size. Note all sm_connection_X require encryption enabled 17723deb3ec6SMatthias Ringwald le_device_db_encryption_get(sm_connection->sm_le_db_index, &setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk, 17733deb3ec6SMatthias Ringwald &encryption_key_size, &authenticated, &authorized); 17743deb3ec6SMatthias Ringwald log_info("db index %u, key size %u, authenticated %u, authorized %u", sm_connection->sm_le_db_index, encryption_key_size, authenticated, authorized); 17753deb3ec6SMatthias Ringwald sm_connection->sm_actual_encryption_key_size = encryption_key_size; 17763deb3ec6SMatthias Ringwald sm_connection->sm_connection_authenticated = authenticated; 17773deb3ec6SMatthias Ringwald sm_connection->sm_connection_authorization_state = authorized ? AUTHORIZATION_GRANTED : AUTHORIZATION_UNKNOWN; 17783deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_INITIATOR_PH0_SEND_START_ENCRYPTION; 17793deb3ec6SMatthias Ringwald break; 17803deb3ec6SMatthias Ringwald case SM_RESPONDER_PH0_RECEIVED_LTK: 17813deb3ec6SMatthias Ringwald // re-establish previously used LTK using Rand and EDIV 17823deb3ec6SMatthias Ringwald memcpy(setup->sm_local_rand, sm_connection->sm_local_rand, 8); 17833deb3ec6SMatthias Ringwald setup->sm_local_ediv = sm_connection->sm_local_ediv; 17843deb3ec6SMatthias Ringwald // re-establish used key encryption size 17853deb3ec6SMatthias Ringwald // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand 17863deb3ec6SMatthias Ringwald sm_connection->sm_actual_encryption_key_size = (setup->sm_local_rand[7] & 0x0f) + 1; 17873deb3ec6SMatthias Ringwald // no db for authenticated flag hack: flag is stored in bit 4 of LSB 17883deb3ec6SMatthias Ringwald sm_connection->sm_connection_authenticated = (setup->sm_local_rand[7] & 0x10) >> 4; 17893deb3ec6SMatthias Ringwald log_info("sm: received ltk request with key size %u, authenticated %u", 17903deb3ec6SMatthias Ringwald sm_connection->sm_actual_encryption_key_size, sm_connection->sm_connection_authenticated); 17913deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_RESPONDER_PH4_Y_GET_ENC; 17923deb3ec6SMatthias Ringwald break; 17933deb3ec6SMatthias Ringwald case SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST: 17943deb3ec6SMatthias Ringwald sm_init_setup(sm_connection); 17953deb3ec6SMatthias Ringwald sm_timeout_start(sm_connection); 17963deb3ec6SMatthias Ringwald sm_connection->sm_engine_state = SM_INITIATOR_PH1_SEND_PAIRING_REQUEST; 17973deb3ec6SMatthias Ringwald break; 17983deb3ec6SMatthias Ringwald default: 17993deb3ec6SMatthias Ringwald done = 0; 18003deb3ec6SMatthias Ringwald break; 18013deb3ec6SMatthias Ringwald } 18023deb3ec6SMatthias Ringwald if (done){ 18033deb3ec6SMatthias Ringwald sm_active_connection = sm_connection->sm_handle; 18043deb3ec6SMatthias Ringwald log_info("sm: connection 0x%04x locked setup context as %s", sm_active_connection, sm_connection->sm_role ? "responder" : "initiator"); 18053deb3ec6SMatthias Ringwald } 18063deb3ec6SMatthias Ringwald } 18073deb3ec6SMatthias Ringwald 18083deb3ec6SMatthias Ringwald // 18093deb3ec6SMatthias Ringwald // active connection handling 18103deb3ec6SMatthias Ringwald // 18113deb3ec6SMatthias Ringwald 18123deb3ec6SMatthias Ringwald if (sm_active_connection == 0) return; 18133deb3ec6SMatthias Ringwald 18143deb3ec6SMatthias Ringwald // assert that we could send a SM PDU - not needed for all of the following 1815b170b20fSMatthias Ringwald if (!l2cap_can_send_fixed_channel_packet_now(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)) { 1816b170b20fSMatthias Ringwald l2cap_request_can_send_fix_channel_now_event(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL); 1817b170b20fSMatthias Ringwald return; 1818b170b20fSMatthias Ringwald } 18193deb3ec6SMatthias Ringwald 18203deb3ec6SMatthias Ringwald sm_connection_t * connection = sm_get_connection_for_handle(sm_active_connection); 18213deb3ec6SMatthias Ringwald if (!connection) return; 18223deb3ec6SMatthias Ringwald 18233deb3ec6SMatthias Ringwald sm_key_t plaintext; 18243deb3ec6SMatthias Ringwald int key_distribution_flags; 18253deb3ec6SMatthias Ringwald 18263deb3ec6SMatthias Ringwald log_info("sm_run: state %u", connection->sm_engine_state); 18273deb3ec6SMatthias Ringwald 18283deb3ec6SMatthias Ringwald // responding state 18293deb3ec6SMatthias Ringwald switch (connection->sm_engine_state){ 18303deb3ec6SMatthias Ringwald 18313deb3ec6SMatthias Ringwald // general 18323deb3ec6SMatthias Ringwald case SM_GENERAL_SEND_PAIRING_FAILED: { 18333deb3ec6SMatthias Ringwald uint8_t buffer[2]; 18343deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_FAILED; 18353deb3ec6SMatthias Ringwald buffer[1] = setup->sm_pairing_failed_reason; 18363deb3ec6SMatthias Ringwald connection->sm_engine_state = connection->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED; 18373deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 18383deb3ec6SMatthias Ringwald sm_done_for_handle(connection->sm_handle); 18393deb3ec6SMatthias Ringwald break; 18403deb3ec6SMatthias Ringwald } 18413deb3ec6SMatthias Ringwald 1842aec94140SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 1843aec94140SMatthias Ringwald case SM_SC_W2_CMAC_FOR_CONFIRMATION: 1844aec94140SMatthias Ringwald if (!sm_cmac_ready()) break; 1845aec94140SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CONFIRMATION; 1846aec94140SMatthias Ringwald sm_sc_calculate_local_confirm(connection); 1847aec94140SMatthias Ringwald break; 1848688a08f9SMatthias Ringwald 1849688a08f9SMatthias Ringwald case SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION: 1850688a08f9SMatthias Ringwald if (!sm_cmac_ready()) break; 1851688a08f9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION; 1852688a08f9SMatthias Ringwald sm_sc_calculate_remote_confirm(connection); 1853688a08f9SMatthias Ringwald break; 1854dc300847SMatthias Ringwald 1855dc300847SMatthias Ringwald case SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK: 1856dc300847SMatthias Ringwald if (!sm_cmac_ready()) break; 1857dc300847SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK; 1858dc300847SMatthias Ringwald sm_sc_calculate_f6_for_dhkey_check(connection); 1859dc300847SMatthias Ringwald break; 1860aec94140SMatthias Ringwald #endif 18613deb3ec6SMatthias Ringwald // initiator side 18623deb3ec6SMatthias Ringwald case SM_INITIATOR_PH0_SEND_START_ENCRYPTION: { 18633deb3ec6SMatthias Ringwald sm_key_t peer_ltk_flipped; 18649c80e4ccSMatthias Ringwald reverse_128(setup->sm_peer_ltk, peer_ltk_flipped); 18653deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED; 18663deb3ec6SMatthias Ringwald log_info("sm: hci_le_start_encryption ediv 0x%04x", setup->sm_peer_ediv); 1867c9b8fdd9SMatthias Ringwald uint32_t rand_high = big_endian_read_32(setup->sm_peer_rand, 0); 1868c9b8fdd9SMatthias Ringwald uint32_t rand_low = big_endian_read_32(setup->sm_peer_rand, 4); 18693deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_start_encryption, connection->sm_handle,rand_low, rand_high, setup->sm_peer_ediv, peer_ltk_flipped); 18703deb3ec6SMatthias Ringwald return; 18713deb3ec6SMatthias Ringwald } 18723deb3ec6SMatthias Ringwald 18733deb3ec6SMatthias Ringwald case SM_INITIATOR_PH1_SEND_PAIRING_REQUEST: 18741ad129beSMatthias Ringwald sm_pairing_packet_set_code(setup->sm_m_preq, SM_CODE_PAIRING_REQUEST); 18753deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_PH1_W4_PAIRING_RESPONSE; 18763deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_m_preq, sizeof(sm_pairing_packet_t)); 18773deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 18783deb3ec6SMatthias Ringwald break; 18793deb3ec6SMatthias Ringwald 18803deb3ec6SMatthias Ringwald // responder side 18813deb3ec6SMatthias Ringwald case SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY: 18823deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_IDLE; 18833deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_long_term_key_negative_reply, connection->sm_handle); 18843deb3ec6SMatthias Ringwald return; 18853deb3ec6SMatthias Ringwald 188627c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 1887c6b7cbd9SMatthias Ringwald case SM_SC_SEND_PUBLIC_KEY_COMMAND: { 188827c32905SMatthias Ringwald uint8_t buffer[65]; 188927c32905SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_PUBLIC_KEY; 189027c32905SMatthias Ringwald // 189127c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 189227c32905SMatthias Ringwald uint8_t value[32]; 189327c32905SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.X, value, sizeof(value)); 189427c32905SMatthias Ringwald reverse_256(value, &buffer[1]); 189527c32905SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.Y, value, sizeof(value)); 189627c32905SMatthias Ringwald reverse_256(value, &buffer[33]); 189727c32905SMatthias Ringwald #endif 1898e53be891SMatthias Ringwald // TODO: use random generator to generate nonce 189945a61d50SMatthias Ringwald 1900e53be891SMatthias Ringwald // generate 128-bit nonce 1901e53be891SMatthias Ringwald int i; 1902e53be891SMatthias Ringwald for (i=0;i<16;i++){ 1903e53be891SMatthias Ringwald setup->sm_local_nonce[i] = rand() & 0xff; 1904e53be891SMatthias Ringwald } 1905e53be891SMatthias Ringwald 190645a61d50SMatthias Ringwald // stk generation method 190745a61d50SMatthias Ringwald // passkey entry: notify app to show passkey or to request passkey 190845a61d50SMatthias Ringwald switch (setup->sm_stk_generation_method){ 190945a61d50SMatthias Ringwald case JUST_WORKS: 191045a61d50SMatthias Ringwald case NK_BOTH_INPUT: 191127c32905SMatthias Ringwald if (connection->sm_role){ 1912aec94140SMatthias Ringwald connection->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION; 191327c32905SMatthias Ringwald } else { 1914c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND; 191527c32905SMatthias Ringwald } 191645a61d50SMatthias Ringwald break; 191745a61d50SMatthias Ringwald case PK_INIT_INPUT: 191845a61d50SMatthias Ringwald case PK_RESP_INPUT: 191945a61d50SMatthias Ringwald case OK_BOTH_INPUT: 192045a61d50SMatthias Ringwald // hack for testing: assume user entered '000000' 192145a61d50SMatthias Ringwald // memset(setup->sm_tk, 0, 16); 192245a61d50SMatthias Ringwald memcpy(setup->sm_ra, setup->sm_tk, 16); 192345a61d50SMatthias Ringwald memcpy(setup->sm_rb, setup->sm_tk, 16); 192445a61d50SMatthias Ringwald setup->sm_passkey_bit = 0; 192545a61d50SMatthias Ringwald if (connection->sm_role){ 192645a61d50SMatthias Ringwald // responder 1927c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CONFIRMATION; 192845a61d50SMatthias Ringwald } else { 192945a61d50SMatthias Ringwald // initiator 1930c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND; 193145a61d50SMatthias Ringwald } 193245a61d50SMatthias Ringwald sm_trigger_user_response(connection); 193345a61d50SMatthias Ringwald break; 193445a61d50SMatthias Ringwald case OOB: 193545a61d50SMatthias Ringwald // TODO: implement SC OOB 193645a61d50SMatthias Ringwald break; 193745a61d50SMatthias Ringwald } 193845a61d50SMatthias Ringwald 193927c32905SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 194027c32905SMatthias Ringwald sm_timeout_reset(connection); 194127c32905SMatthias Ringwald break; 194227c32905SMatthias Ringwald } 1943c6b7cbd9SMatthias Ringwald case SM_SC_SEND_CONFIRMATION: { 1944e53be891SMatthias Ringwald uint8_t buffer[17]; 1945e53be891SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_CONFIRM; 19469af0f475SMatthias Ringwald reverse_128(setup->sm_local_confirm, &buffer[1]); 1947e53be891SMatthias Ringwald if (connection->sm_role){ 1948c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM; 1949e53be891SMatthias Ringwald } else { 1950c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CONFIRMATION; 1951e53be891SMatthias Ringwald } 1952e53be891SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 1953e53be891SMatthias Ringwald sm_timeout_reset(connection); 1954e53be891SMatthias Ringwald break; 1955e53be891SMatthias Ringwald } 1956c6b7cbd9SMatthias Ringwald case SM_SC_SEND_PAIRING_RANDOM: { 1957e53be891SMatthias Ringwald uint8_t buffer[17]; 1958e53be891SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_RANDOM; 1959e53be891SMatthias Ringwald reverse_128(setup->sm_local_nonce, &buffer[1]); 196045a61d50SMatthias Ringwald if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT && setup->sm_passkey_bit < 20){ 196145a61d50SMatthias Ringwald if (connection->sm_role){ 196245a61d50SMatthias Ringwald // responder 1963c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_CONFIRMATION; 196445a61d50SMatthias Ringwald } else { 196545a61d50SMatthias Ringwald // initiator 1966c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM; 196745a61d50SMatthias Ringwald } 196845a61d50SMatthias Ringwald } else { 1969e53be891SMatthias Ringwald if (connection->sm_role){ 1970e53be891SMatthias Ringwald // responder 1971c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND; 1972446a8c36SMatthias Ringwald if (setup->sm_stk_generation_method == NK_BOTH_INPUT){ 1973446a8c36SMatthias Ringwald // calc Vb if numeric comparison 1974446a8c36SMatthias Ringwald // TODO: use AES Engine to calculate g2 1975446a8c36SMatthias Ringwald uint8_t value[32]; 1976446a8c36SMatthias Ringwald mbedtls_mpi_write_binary(&le_keypair.Q.X, value, sizeof(value)); 1977446a8c36SMatthias Ringwald uint32_t vb = g2(setup->sm_peer_qx, value, setup->sm_peer_nonce, setup->sm_local_nonce) % 1000000; 1978446a8c36SMatthias Ringwald big_endian_store_32(setup->sm_tk, 12, vb); 1979446a8c36SMatthias Ringwald sm_trigger_user_response(connection); 1980446a8c36SMatthias Ringwald } 1981e53be891SMatthias Ringwald } else { 1982136d331aSMatthias Ringwald // initiator 1983c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM; 1984e53be891SMatthias Ringwald } 198545a61d50SMatthias Ringwald } 1986e53be891SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 1987e53be891SMatthias Ringwald sm_timeout_reset(connection); 1988e53be891SMatthias Ringwald break; 1989e53be891SMatthias Ringwald } 1990c6b7cbd9SMatthias Ringwald case SM_SC_SEND_DHKEY_CHECK_COMMAND: { 1991e083ca23SMatthias Ringwald uint8_t buffer[17]; 1992e083ca23SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_DHKEY_CHECK; 1993e53be891SMatthias Ringwald reverse_128(setup->sm_local_dhkey_check, &buffer[1]); 1994dc300847SMatthias Ringwald 1995e53be891SMatthias Ringwald if (connection->sm_role){ 1996c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_LTK_REQUEST_SC; 1997e53be891SMatthias Ringwald } else { 1998c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND; 1999e53be891SMatthias Ringwald } 2000e083ca23SMatthias Ringwald 2001e53be891SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 2002e53be891SMatthias Ringwald sm_timeout_reset(connection); 2003e53be891SMatthias Ringwald break; 2004e53be891SMatthias Ringwald } 2005e53be891SMatthias Ringwald 2006e53be891SMatthias Ringwald #endif 20073deb3ec6SMatthias Ringwald case SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE: 20083deb3ec6SMatthias Ringwald // echo initiator for now 20091ad129beSMatthias Ringwald sm_pairing_packet_set_code(setup->sm_s_pres,SM_CODE_PAIRING_RESPONSE); 20103deb3ec6SMatthias Ringwald key_distribution_flags = sm_key_distribution_flags_for_auth_req(); 20111ad129beSMatthias Ringwald 20123deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_CONFIRM; 201327c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 201427c32905SMatthias Ringwald if (setup->sm_use_secure_connections){ 2015c6b7cbd9SMatthias Ringwald connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND; 201652f9cf63SMatthias Ringwald // skip LTK/EDIV for SC 201752f9cf63SMatthias Ringwald key_distribution_flags &= ~SM_KEYDIST_ENC_KEY; 201827c32905SMatthias Ringwald } 201927c32905SMatthias Ringwald #endif 202052f9cf63SMatthias 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); 202152f9cf63SMatthias 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); 202252f9cf63SMatthias Ringwald 20233deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_s_pres, sizeof(sm_pairing_packet_t)); 20243deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 2025446a8c36SMatthias Ringwald // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged 202645a61d50SMatthias Ringwald if (setup->sm_stk_generation_method == JUST_WORKS){ 20273deb3ec6SMatthias Ringwald sm_trigger_user_response(connection); 2028446a8c36SMatthias Ringwald } 20293deb3ec6SMatthias Ringwald return; 20303deb3ec6SMatthias Ringwald 20313deb3ec6SMatthias Ringwald case SM_PH2_SEND_PAIRING_RANDOM: { 20323deb3ec6SMatthias Ringwald uint8_t buffer[17]; 20333deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_RANDOM; 20349c80e4ccSMatthias Ringwald reverse_128(setup->sm_local_random, &buffer[1]); 20353deb3ec6SMatthias Ringwald if (connection->sm_role){ 20363deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH2_W4_LTK_REQUEST; 20373deb3ec6SMatthias Ringwald } else { 20383deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_RANDOM; 20393deb3ec6SMatthias Ringwald } 20403deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 20413deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 20423deb3ec6SMatthias Ringwald break; 20433deb3ec6SMatthias Ringwald } 20443deb3ec6SMatthias Ringwald 20453deb3ec6SMatthias Ringwald case SM_PH2_GET_RANDOM_TK: 20463deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_RANDOM_A: 20473deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_RANDOM_B: 20483deb3ec6SMatthias Ringwald case SM_PH3_GET_RANDOM: 20493deb3ec6SMatthias Ringwald case SM_PH3_GET_DIV: 20503deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20513deb3ec6SMatthias Ringwald sm_random_start(connection); 20523deb3ec6SMatthias Ringwald return; 20533deb3ec6SMatthias Ringwald 20543deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_ENC_B: 20553deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_ENC_D: 20563deb3ec6SMatthias Ringwald // already busy? 20573deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 20583deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20593deb3ec6SMatthias Ringwald sm_aes128_start(setup->sm_tk, setup->sm_c1_t3_value, connection); 20603deb3ec6SMatthias Ringwald return; 20613deb3ec6SMatthias Ringwald 20623deb3ec6SMatthias Ringwald case SM_PH3_LTK_GET_ENC: 20633deb3ec6SMatthias Ringwald case SM_RESPONDER_PH4_LTK_GET_ENC: 20643deb3ec6SMatthias Ringwald // already busy? 20653deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_IDLE) { 20663deb3ec6SMatthias Ringwald sm_key_t d_prime; 20673deb3ec6SMatthias Ringwald sm_d1_d_prime(setup->sm_local_div, 0, d_prime); 20683deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20693deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_er, d_prime, connection); 20703deb3ec6SMatthias Ringwald return; 20713deb3ec6SMatthias Ringwald } 20723deb3ec6SMatthias Ringwald break; 20733deb3ec6SMatthias Ringwald 20743deb3ec6SMatthias Ringwald case SM_PH3_CSRK_GET_ENC: 20753deb3ec6SMatthias Ringwald // already busy? 20763deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_IDLE) { 20773deb3ec6SMatthias Ringwald sm_key_t d_prime; 20783deb3ec6SMatthias Ringwald sm_d1_d_prime(setup->sm_local_div, 1, d_prime); 20793deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20803deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_er, d_prime, connection); 20813deb3ec6SMatthias Ringwald return; 20823deb3ec6SMatthias Ringwald } 20833deb3ec6SMatthias Ringwald break; 20843deb3ec6SMatthias Ringwald 20853deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_ENC_C: 20863deb3ec6SMatthias Ringwald // already busy? 20873deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 20883deb3ec6SMatthias Ringwald // calculate m_confirm using aes128 engine - step 1 20893deb3ec6SMatthias 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); 20903deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20913deb3ec6SMatthias Ringwald sm_aes128_start(setup->sm_tk, plaintext, connection); 20923deb3ec6SMatthias Ringwald break; 20933deb3ec6SMatthias Ringwald case SM_PH2_C1_GET_ENC_A: 20943deb3ec6SMatthias Ringwald // already busy? 20953deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 20963deb3ec6SMatthias Ringwald // calculate confirm using aes128 engine - step 1 20973deb3ec6SMatthias 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); 20983deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 20993deb3ec6SMatthias Ringwald sm_aes128_start(setup->sm_tk, plaintext, connection); 21003deb3ec6SMatthias Ringwald break; 21013deb3ec6SMatthias Ringwald case SM_PH2_CALC_STK: 21023deb3ec6SMatthias Ringwald // already busy? 21033deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 21043deb3ec6SMatthias Ringwald // calculate STK 21053deb3ec6SMatthias Ringwald if (connection->sm_role){ 21063deb3ec6SMatthias Ringwald sm_s1_r_prime(setup->sm_local_random, setup->sm_peer_random, plaintext); 21073deb3ec6SMatthias Ringwald } else { 21083deb3ec6SMatthias Ringwald sm_s1_r_prime(setup->sm_peer_random, setup->sm_local_random, plaintext); 21093deb3ec6SMatthias Ringwald } 21103deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 21113deb3ec6SMatthias Ringwald sm_aes128_start(setup->sm_tk, plaintext, connection); 21123deb3ec6SMatthias Ringwald break; 21133deb3ec6SMatthias Ringwald case SM_PH3_Y_GET_ENC: 21143deb3ec6SMatthias Ringwald // already busy? 21153deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 21163deb3ec6SMatthias Ringwald // PH3B2 - calculate Y from - enc 21173deb3ec6SMatthias Ringwald // Y = dm(DHK, Rand) 21183deb3ec6SMatthias Ringwald sm_dm_r_prime(setup->sm_local_rand, plaintext); 21193deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 21203deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_dhk, plaintext, connection); 21213deb3ec6SMatthias Ringwald return; 21223deb3ec6SMatthias Ringwald case SM_PH2_C1_SEND_PAIRING_CONFIRM: { 21233deb3ec6SMatthias Ringwald uint8_t buffer[17]; 21243deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_PAIRING_CONFIRM; 21259c80e4ccSMatthias Ringwald reverse_128(setup->sm_local_confirm, &buffer[1]); 21263deb3ec6SMatthias Ringwald if (connection->sm_role){ 21273deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH2_W4_PAIRING_RANDOM; 21283deb3ec6SMatthias Ringwald } else { 21293deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_CONFIRM; 21303deb3ec6SMatthias Ringwald } 21313deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 21323deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 21333deb3ec6SMatthias Ringwald return; 21343deb3ec6SMatthias Ringwald } 21353deb3ec6SMatthias Ringwald case SM_RESPONDER_PH2_SEND_LTK_REPLY: { 21363deb3ec6SMatthias Ringwald sm_key_t stk_flipped; 21379c80e4ccSMatthias Ringwald reverse_128(setup->sm_ltk, stk_flipped); 21383deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED; 21393deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, stk_flipped); 21403deb3ec6SMatthias Ringwald return; 21413deb3ec6SMatthias Ringwald } 21423deb3ec6SMatthias Ringwald case SM_INITIATOR_PH3_SEND_START_ENCRYPTION: { 21433deb3ec6SMatthias Ringwald sm_key_t stk_flipped; 21449c80e4ccSMatthias Ringwald reverse_128(setup->sm_ltk, stk_flipped); 21453deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED; 21463deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_start_encryption, connection->sm_handle, 0, 0, 0, stk_flipped); 21473deb3ec6SMatthias Ringwald return; 21483deb3ec6SMatthias Ringwald } 21493deb3ec6SMatthias Ringwald case SM_RESPONDER_PH4_SEND_LTK: { 21503deb3ec6SMatthias Ringwald sm_key_t ltk_flipped; 21519c80e4ccSMatthias Ringwald reverse_128(setup->sm_ltk, ltk_flipped); 21523deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_IDLE; 21533deb3ec6SMatthias Ringwald hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, ltk_flipped); 21543deb3ec6SMatthias Ringwald return; 21553deb3ec6SMatthias Ringwald } 21563deb3ec6SMatthias Ringwald case SM_RESPONDER_PH4_Y_GET_ENC: 21573deb3ec6SMatthias Ringwald // already busy? 21583deb3ec6SMatthias Ringwald if (sm_aes128_state == SM_AES128_ACTIVE) break; 21593deb3ec6SMatthias Ringwald log_info("LTK Request: recalculating with ediv 0x%04x", setup->sm_local_ediv); 21603deb3ec6SMatthias Ringwald // Y = dm(DHK, Rand) 21613deb3ec6SMatthias Ringwald sm_dm_r_prime(setup->sm_local_rand, plaintext); 21623deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 21633deb3ec6SMatthias Ringwald sm_aes128_start(sm_persistent_dhk, plaintext, connection); 21643deb3ec6SMatthias Ringwald return; 21653deb3ec6SMatthias Ringwald 21663deb3ec6SMatthias Ringwald case SM_PH3_DISTRIBUTE_KEYS: 21673deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION){ 21683deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION; 21693deb3ec6SMatthias Ringwald uint8_t buffer[17]; 21703deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_ENCRYPTION_INFORMATION; 21719c80e4ccSMatthias Ringwald reverse_128(setup->sm_ltk, &buffer[1]); 21723deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 21733deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 21743deb3ec6SMatthias Ringwald return; 21753deb3ec6SMatthias Ringwald } 21763deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_MASTER_IDENTIFICATION){ 21773deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_MASTER_IDENTIFICATION; 21783deb3ec6SMatthias Ringwald uint8_t buffer[11]; 21793deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_MASTER_IDENTIFICATION; 2180f8fbdce0SMatthias Ringwald little_endian_store_16(buffer, 1, setup->sm_local_ediv); 21819c80e4ccSMatthias Ringwald reverse_64(setup->sm_local_rand, &buffer[3]); 21823deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 21833deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 21843deb3ec6SMatthias Ringwald return; 21853deb3ec6SMatthias Ringwald } 21863deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_IDENTITY_INFORMATION){ 21873deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_INFORMATION; 21883deb3ec6SMatthias Ringwald uint8_t buffer[17]; 21893deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_IDENTITY_INFORMATION; 21909c80e4ccSMatthias Ringwald reverse_128(sm_persistent_irk, &buffer[1]); 21913deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 21923deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 21933deb3ec6SMatthias Ringwald return; 21943deb3ec6SMatthias Ringwald } 21953deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION){ 21963deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION; 21973deb3ec6SMatthias Ringwald bd_addr_t local_address; 21983deb3ec6SMatthias Ringwald uint8_t buffer[8]; 21993deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_IDENTITY_ADDRESS_INFORMATION; 220015a95bd5SMatthias Ringwald gap_advertisements_get_address(&buffer[1], local_address); 2201724d70a2SMatthias Ringwald reverse_bd_addr(local_address, &buffer[2]); 22023deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 22033deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 22043deb3ec6SMatthias Ringwald return; 22053deb3ec6SMatthias Ringwald } 22063deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){ 22073deb3ec6SMatthias Ringwald setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION; 22083deb3ec6SMatthias Ringwald 22093deb3ec6SMatthias Ringwald // hack to reproduce test runs 22103deb3ec6SMatthias Ringwald if (test_use_fixed_local_csrk){ 22113deb3ec6SMatthias Ringwald memset(setup->sm_local_csrk, 0xcc, 16); 22123deb3ec6SMatthias Ringwald } 22133deb3ec6SMatthias Ringwald 22143deb3ec6SMatthias Ringwald uint8_t buffer[17]; 22153deb3ec6SMatthias Ringwald buffer[0] = SM_CODE_SIGNING_INFORMATION; 22169c80e4ccSMatthias Ringwald reverse_128(setup->sm_local_csrk, &buffer[1]); 22173deb3ec6SMatthias Ringwald l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer)); 22183deb3ec6SMatthias Ringwald sm_timeout_reset(connection); 22193deb3ec6SMatthias Ringwald return; 22203deb3ec6SMatthias Ringwald } 22213deb3ec6SMatthias Ringwald 22223deb3ec6SMatthias Ringwald // keys are sent 22233deb3ec6SMatthias Ringwald if (connection->sm_role){ 22243deb3ec6SMatthias Ringwald // slave -> receive master keys if any 22253deb3ec6SMatthias Ringwald if (sm_key_distribution_all_received(connection)){ 22263deb3ec6SMatthias Ringwald sm_key_distribution_handle_all_received(connection); 22273deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_IDLE; 22283deb3ec6SMatthias Ringwald sm_done_for_handle(connection->sm_handle); 22293deb3ec6SMatthias Ringwald } else { 22303deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_RECEIVE_KEYS; 22313deb3ec6SMatthias Ringwald } 22323deb3ec6SMatthias Ringwald } else { 22333deb3ec6SMatthias Ringwald // master -> all done 22343deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_CONNECTED; 22353deb3ec6SMatthias Ringwald sm_done_for_handle(connection->sm_handle); 22363deb3ec6SMatthias Ringwald } 22373deb3ec6SMatthias Ringwald break; 22383deb3ec6SMatthias Ringwald 22393deb3ec6SMatthias Ringwald default: 22403deb3ec6SMatthias Ringwald break; 22413deb3ec6SMatthias Ringwald } 22423deb3ec6SMatthias Ringwald 22433deb3ec6SMatthias Ringwald // check again if active connection was released 22443deb3ec6SMatthias Ringwald if (sm_active_connection) break; 22453deb3ec6SMatthias Ringwald } 22463deb3ec6SMatthias Ringwald } 22473deb3ec6SMatthias Ringwald 22483deb3ec6SMatthias Ringwald // note: aes engine is ready as we just got the aes result 22493deb3ec6SMatthias Ringwald static void sm_handle_encryption_result(uint8_t * data){ 22503deb3ec6SMatthias Ringwald 22513deb3ec6SMatthias Ringwald sm_aes128_state = SM_AES128_IDLE; 22523deb3ec6SMatthias Ringwald 22533deb3ec6SMatthias Ringwald if (sm_address_resolution_ah_calculation_active){ 22543deb3ec6SMatthias Ringwald sm_address_resolution_ah_calculation_active = 0; 22553deb3ec6SMatthias Ringwald // compare calulated address against connecting device 22563deb3ec6SMatthias Ringwald uint8_t hash[3]; 22579c80e4ccSMatthias Ringwald reverse_24(data, hash); 22583deb3ec6SMatthias Ringwald if (memcmp(&sm_address_resolution_address[3], hash, 3) == 0){ 22593deb3ec6SMatthias Ringwald log_info("LE Device Lookup: matched resolvable private address"); 22603deb3ec6SMatthias Ringwald sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED); 22613deb3ec6SMatthias Ringwald return; 22623deb3ec6SMatthias Ringwald } 22633deb3ec6SMatthias Ringwald // no match, try next 22643deb3ec6SMatthias Ringwald sm_address_resolution_test++; 22653deb3ec6SMatthias Ringwald return; 22663deb3ec6SMatthias Ringwald } 22673deb3ec6SMatthias Ringwald 22683deb3ec6SMatthias Ringwald switch (dkg_state){ 22693deb3ec6SMatthias Ringwald case DKG_W4_IRK: 22709c80e4ccSMatthias Ringwald reverse_128(data, sm_persistent_irk); 22718314c363SMatthias Ringwald log_info_key("irk", sm_persistent_irk); 22723deb3ec6SMatthias Ringwald dkg_next_state(); 22733deb3ec6SMatthias Ringwald return; 22743deb3ec6SMatthias Ringwald case DKG_W4_DHK: 22759c80e4ccSMatthias Ringwald reverse_128(data, sm_persistent_dhk); 22768314c363SMatthias Ringwald log_info_key("dhk", sm_persistent_dhk); 22773deb3ec6SMatthias Ringwald dkg_next_state(); 22786f792faaSMatthias Ringwald // SM Init Finished 22793deb3ec6SMatthias Ringwald return; 22803deb3ec6SMatthias Ringwald default: 22813deb3ec6SMatthias Ringwald break; 22823deb3ec6SMatthias Ringwald } 22833deb3ec6SMatthias Ringwald 22843deb3ec6SMatthias Ringwald switch (rau_state){ 22853deb3ec6SMatthias Ringwald case RAU_W4_ENC: 22869c80e4ccSMatthias Ringwald reverse_24(data, &sm_random_address[3]); 22873deb3ec6SMatthias Ringwald rau_next_state(); 22883deb3ec6SMatthias Ringwald return; 22893deb3ec6SMatthias Ringwald default: 22903deb3ec6SMatthias Ringwald break; 22913deb3ec6SMatthias Ringwald } 22923deb3ec6SMatthias Ringwald 22933deb3ec6SMatthias Ringwald switch (sm_cmac_state){ 22943deb3ec6SMatthias Ringwald case CMAC_W4_SUBKEYS: 22953deb3ec6SMatthias Ringwald case CMAC_W4_MI: 22963deb3ec6SMatthias Ringwald case CMAC_W4_MLAST: 22973deb3ec6SMatthias Ringwald { 22983deb3ec6SMatthias Ringwald sm_key_t t; 22999c80e4ccSMatthias Ringwald reverse_128(data, t); 23003deb3ec6SMatthias Ringwald sm_cmac_handle_encryption_result(t); 23013deb3ec6SMatthias Ringwald } 23023deb3ec6SMatthias Ringwald return; 23033deb3ec6SMatthias Ringwald default: 23043deb3ec6SMatthias Ringwald break; 23053deb3ec6SMatthias Ringwald } 23063deb3ec6SMatthias Ringwald 23073deb3ec6SMatthias Ringwald // retrieve sm_connection provided to sm_aes128_start_encryption 23083deb3ec6SMatthias Ringwald sm_connection_t * connection = (sm_connection_t*) sm_aes128_context; 23093deb3ec6SMatthias Ringwald if (!connection) return; 23103deb3ec6SMatthias Ringwald switch (connection->sm_engine_state){ 23113deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_ENC_A: 23123deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_ENC_C: 23133deb3ec6SMatthias Ringwald { 23143deb3ec6SMatthias Ringwald sm_key_t t2; 23159c80e4ccSMatthias Ringwald reverse_128(data, t2); 23163deb3ec6SMatthias Ringwald sm_c1_t3(t2, setup->sm_m_address, setup->sm_s_address, setup->sm_c1_t3_value); 23173deb3ec6SMatthias Ringwald } 23183deb3ec6SMatthias Ringwald sm_next_responding_state(connection); 23193deb3ec6SMatthias Ringwald return; 23203deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_ENC_B: 23219c80e4ccSMatthias Ringwald reverse_128(data, setup->sm_local_confirm); 23228314c363SMatthias Ringwald log_info_key("c1!", setup->sm_local_confirm); 23233deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_C1_SEND_PAIRING_CONFIRM; 23243deb3ec6SMatthias Ringwald return; 23253deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_ENC_D: 23263deb3ec6SMatthias Ringwald { 23273deb3ec6SMatthias Ringwald sm_key_t peer_confirm_test; 23289c80e4ccSMatthias Ringwald reverse_128(data, peer_confirm_test); 23298314c363SMatthias Ringwald log_info_key("c1!", peer_confirm_test); 23303deb3ec6SMatthias Ringwald if (memcmp(setup->sm_peer_confirm, peer_confirm_test, 16) != 0){ 23313deb3ec6SMatthias Ringwald setup->sm_pairing_failed_reason = SM_REASON_CONFIRM_VALUE_FAILED; 23323deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED; 23333deb3ec6SMatthias Ringwald return; 23343deb3ec6SMatthias Ringwald } 23353deb3ec6SMatthias Ringwald if (connection->sm_role){ 23363deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM; 23373deb3ec6SMatthias Ringwald } else { 23383deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_CALC_STK; 23393deb3ec6SMatthias Ringwald } 23403deb3ec6SMatthias Ringwald } 23413deb3ec6SMatthias Ringwald return; 23423deb3ec6SMatthias Ringwald case SM_PH2_W4_STK: 23439c80e4ccSMatthias Ringwald reverse_128(data, setup->sm_ltk); 23443deb3ec6SMatthias Ringwald sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size); 23458314c363SMatthias Ringwald log_info_key("stk", setup->sm_ltk); 23463deb3ec6SMatthias Ringwald if (connection->sm_role){ 23473deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY; 23483deb3ec6SMatthias Ringwald } else { 23493deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION; 23503deb3ec6SMatthias Ringwald } 23513deb3ec6SMatthias Ringwald return; 23523deb3ec6SMatthias Ringwald case SM_PH3_Y_W4_ENC:{ 23533deb3ec6SMatthias Ringwald sm_key_t y128; 23549c80e4ccSMatthias Ringwald reverse_128(data, y128); 2355f8fbdce0SMatthias Ringwald setup->sm_local_y = big_endian_read_16(y128, 14); 23563deb3ec6SMatthias Ringwald log_info_hex16("y", setup->sm_local_y); 23573deb3ec6SMatthias Ringwald // PH3B3 - calculate EDIV 23583deb3ec6SMatthias Ringwald setup->sm_local_ediv = setup->sm_local_y ^ setup->sm_local_div; 23593deb3ec6SMatthias Ringwald log_info_hex16("ediv", setup->sm_local_ediv); 23603deb3ec6SMatthias Ringwald // PH3B4 - calculate LTK - enc 23613deb3ec6SMatthias Ringwald // LTK = d1(ER, DIV, 0)) 23623deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_LTK_GET_ENC; 23633deb3ec6SMatthias Ringwald return; 23643deb3ec6SMatthias Ringwald } 23653deb3ec6SMatthias Ringwald case SM_RESPONDER_PH4_Y_W4_ENC:{ 23663deb3ec6SMatthias Ringwald sm_key_t y128; 23679c80e4ccSMatthias Ringwald reverse_128(data, y128); 2368f8fbdce0SMatthias Ringwald setup->sm_local_y = big_endian_read_16(y128, 14); 23693deb3ec6SMatthias Ringwald log_info_hex16("y", setup->sm_local_y); 23703deb3ec6SMatthias Ringwald 23713deb3ec6SMatthias Ringwald // PH3B3 - calculate DIV 23723deb3ec6SMatthias Ringwald setup->sm_local_div = setup->sm_local_y ^ setup->sm_local_ediv; 23733deb3ec6SMatthias Ringwald log_info_hex16("ediv", setup->sm_local_ediv); 23743deb3ec6SMatthias Ringwald // PH3B4 - calculate LTK - enc 23753deb3ec6SMatthias Ringwald // LTK = d1(ER, DIV, 0)) 23763deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH4_LTK_GET_ENC; 23773deb3ec6SMatthias Ringwald return; 23783deb3ec6SMatthias Ringwald } 23793deb3ec6SMatthias Ringwald case SM_PH3_LTK_W4_ENC: 23809c80e4ccSMatthias Ringwald reverse_128(data, setup->sm_ltk); 23818314c363SMatthias Ringwald log_info_key("ltk", setup->sm_ltk); 23823deb3ec6SMatthias Ringwald // calc CSRK next 23833deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_CSRK_GET_ENC; 23843deb3ec6SMatthias Ringwald return; 23853deb3ec6SMatthias Ringwald case SM_PH3_CSRK_W4_ENC: 23869c80e4ccSMatthias Ringwald reverse_128(data, setup->sm_local_csrk); 23878314c363SMatthias Ringwald log_info_key("csrk", setup->sm_local_csrk); 23883deb3ec6SMatthias Ringwald if (setup->sm_key_distribution_send_set){ 23893deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS; 23903deb3ec6SMatthias Ringwald } else { 23913deb3ec6SMatthias Ringwald // no keys to send, just continue 23923deb3ec6SMatthias Ringwald if (connection->sm_role){ 23933deb3ec6SMatthias Ringwald // slave -> receive master keys 23943deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_RECEIVE_KEYS; 23953deb3ec6SMatthias Ringwald } else { 23963deb3ec6SMatthias Ringwald // master -> all done 23973deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_INITIATOR_CONNECTED; 23983deb3ec6SMatthias Ringwald sm_done_for_handle(connection->sm_handle); 23993deb3ec6SMatthias Ringwald } 24003deb3ec6SMatthias Ringwald } 24013deb3ec6SMatthias Ringwald return; 24023deb3ec6SMatthias Ringwald case SM_RESPONDER_PH4_LTK_W4_ENC: 24039c80e4ccSMatthias Ringwald reverse_128(data, setup->sm_ltk); 24043deb3ec6SMatthias Ringwald sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size); 24058314c363SMatthias Ringwald log_info_key("ltk", setup->sm_ltk); 24063deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH4_SEND_LTK; 24073deb3ec6SMatthias Ringwald return; 24083deb3ec6SMatthias Ringwald default: 24093deb3ec6SMatthias Ringwald break; 24103deb3ec6SMatthias Ringwald } 24113deb3ec6SMatthias Ringwald } 24123deb3ec6SMatthias Ringwald 24133deb3ec6SMatthias Ringwald // note: random generator is ready. this doesn NOT imply that aes engine is unused! 24143deb3ec6SMatthias Ringwald static void sm_handle_random_result(uint8_t * data){ 24153deb3ec6SMatthias Ringwald 24163deb3ec6SMatthias Ringwald switch (rau_state){ 24173deb3ec6SMatthias Ringwald case RAU_W4_RANDOM: 24183deb3ec6SMatthias Ringwald // non-resolvable vs. resolvable 24193deb3ec6SMatthias Ringwald switch (gap_random_adress_type){ 24203deb3ec6SMatthias Ringwald case GAP_RANDOM_ADDRESS_RESOLVABLE: 24213deb3ec6SMatthias Ringwald // resolvable: use random as prand and calc address hash 24223deb3ec6SMatthias Ringwald // "The two most significant bits of prand shall be equal to ‘0’ and ‘1" 24233deb3ec6SMatthias Ringwald memcpy(sm_random_address, data, 3); 24243deb3ec6SMatthias Ringwald sm_random_address[0] &= 0x3f; 24253deb3ec6SMatthias Ringwald sm_random_address[0] |= 0x40; 24263deb3ec6SMatthias Ringwald rau_state = RAU_GET_ENC; 24273deb3ec6SMatthias Ringwald break; 24283deb3ec6SMatthias Ringwald case GAP_RANDOM_ADDRESS_NON_RESOLVABLE: 24293deb3ec6SMatthias Ringwald default: 24303deb3ec6SMatthias Ringwald // "The two most significant bits of the address shall be equal to ‘0’"" 24313deb3ec6SMatthias Ringwald memcpy(sm_random_address, data, 6); 24323deb3ec6SMatthias Ringwald sm_random_address[0] &= 0x3f; 24333deb3ec6SMatthias Ringwald rau_state = RAU_SET_ADDRESS; 24343deb3ec6SMatthias Ringwald break; 24353deb3ec6SMatthias Ringwald } 24363deb3ec6SMatthias Ringwald return; 24373deb3ec6SMatthias Ringwald default: 24383deb3ec6SMatthias Ringwald break; 24393deb3ec6SMatthias Ringwald } 24403deb3ec6SMatthias Ringwald 24413deb3ec6SMatthias Ringwald // retrieve sm_connection provided to sm_random_start 24423deb3ec6SMatthias Ringwald sm_connection_t * connection = (sm_connection_t *) sm_random_context; 24433deb3ec6SMatthias Ringwald if (!connection) return; 24443deb3ec6SMatthias Ringwald switch (connection->sm_engine_state){ 24453deb3ec6SMatthias Ringwald case SM_PH2_W4_RANDOM_TK: 24463deb3ec6SMatthias Ringwald { 24473deb3ec6SMatthias Ringwald // map random to 0-999999 without speding much cycles on a modulus operation 2448f8fbdce0SMatthias Ringwald uint32_t tk = little_endian_read_32(data,0); 24493deb3ec6SMatthias Ringwald tk = tk & 0xfffff; // 1048575 24503deb3ec6SMatthias Ringwald if (tk >= 999999){ 24513deb3ec6SMatthias Ringwald tk = tk - 999999; 24523deb3ec6SMatthias Ringwald } 24533deb3ec6SMatthias Ringwald sm_reset_tk(); 2454f8fbdce0SMatthias Ringwald big_endian_store_32(setup->sm_tk, 12, tk); 24553deb3ec6SMatthias Ringwald if (connection->sm_role){ 24563deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE; 24573deb3ec6SMatthias Ringwald } else { 24583deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH1_W4_USER_RESPONSE; 24593deb3ec6SMatthias Ringwald sm_trigger_user_response(connection); 24603deb3ec6SMatthias Ringwald // response_idle == nothing <--> sm_trigger_user_response() did not require response 24613deb3ec6SMatthias Ringwald if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){ 24623deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_A; 24633deb3ec6SMatthias Ringwald } 24643deb3ec6SMatthias Ringwald } 24653deb3ec6SMatthias Ringwald return; 24663deb3ec6SMatthias Ringwald } 24673deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_RANDOM_A: 24683deb3ec6SMatthias Ringwald memcpy(&setup->sm_local_random[0], data, 8); // random endinaness 24693deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_B; 24703deb3ec6SMatthias Ringwald return; 24713deb3ec6SMatthias Ringwald case SM_PH2_C1_W4_RANDOM_B: 24723deb3ec6SMatthias Ringwald memcpy(&setup->sm_local_random[8], data, 8); // random endinaness 24733deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH2_C1_GET_ENC_A; 24743deb3ec6SMatthias Ringwald return; 24753deb3ec6SMatthias Ringwald case SM_PH3_W4_RANDOM: 24769c80e4ccSMatthias Ringwald reverse_64(data, setup->sm_local_rand); 24773deb3ec6SMatthias Ringwald // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand 24783deb3ec6SMatthias Ringwald setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xf0) + (connection->sm_actual_encryption_key_size - 1); 24793deb3ec6SMatthias Ringwald // no db for authenticated flag hack: store flag in bit 4 of LSB 24803deb3ec6SMatthias Ringwald setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xef) + (connection->sm_connection_authenticated << 4); 24813deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_GET_DIV; 24823deb3ec6SMatthias Ringwald return; 24833deb3ec6SMatthias Ringwald case SM_PH3_W4_DIV: 24843deb3ec6SMatthias Ringwald // use 16 bit from random value as div 2485f8fbdce0SMatthias Ringwald setup->sm_local_div = big_endian_read_16(data, 0); 24863deb3ec6SMatthias Ringwald log_info_hex16("div", setup->sm_local_div); 24873deb3ec6SMatthias Ringwald connection->sm_engine_state = SM_PH3_Y_GET_ENC; 24883deb3ec6SMatthias Ringwald return; 24893deb3ec6SMatthias Ringwald default: 24903deb3ec6SMatthias Ringwald break; 24913deb3ec6SMatthias Ringwald } 24923deb3ec6SMatthias Ringwald } 24933deb3ec6SMatthias Ringwald 2494d9a7306aSMatthias Ringwald static void sm_event_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){ 24953deb3ec6SMatthias Ringwald 24963deb3ec6SMatthias Ringwald sm_connection_t * sm_conn; 2497711e6c80SMatthias Ringwald hci_con_handle_t con_handle; 24983deb3ec6SMatthias Ringwald 24993deb3ec6SMatthias Ringwald switch (packet_type) { 25003deb3ec6SMatthias Ringwald 25013deb3ec6SMatthias Ringwald case HCI_EVENT_PACKET: 25020e2df43fSMatthias Ringwald switch (hci_event_packet_get_type(packet)) { 25033deb3ec6SMatthias Ringwald 25043deb3ec6SMatthias Ringwald case BTSTACK_EVENT_STATE: 25053deb3ec6SMatthias Ringwald // bt stack activated, get started 2506be7cc9a0SMilanka Ringwald if (btstack_event_state_get_state(packet) == HCI_STATE_WORKING){ 25073deb3ec6SMatthias Ringwald log_info("HCI Working!"); 25083deb3ec6SMatthias Ringwald dkg_state = sm_persistent_irk_ready ? DKG_CALC_DHK : DKG_CALC_IRK; 25093deb3ec6SMatthias Ringwald rau_state = RAU_IDLE; 25103deb3ec6SMatthias Ringwald sm_run(); 25113deb3ec6SMatthias Ringwald } 25123deb3ec6SMatthias Ringwald break; 25133deb3ec6SMatthias Ringwald 25143deb3ec6SMatthias Ringwald case HCI_EVENT_LE_META: 25153deb3ec6SMatthias Ringwald switch (packet[2]) { 25163deb3ec6SMatthias Ringwald case HCI_SUBEVENT_LE_CONNECTION_COMPLETE: 25173deb3ec6SMatthias Ringwald 25183deb3ec6SMatthias Ringwald log_info("sm: connected"); 25193deb3ec6SMatthias Ringwald 25203deb3ec6SMatthias Ringwald if (packet[3]) return; // connection failed 25213deb3ec6SMatthias Ringwald 2522711e6c80SMatthias Ringwald con_handle = little_endian_read_16(packet, 4); 2523711e6c80SMatthias Ringwald sm_conn = sm_get_connection_for_handle(con_handle); 25243deb3ec6SMatthias Ringwald if (!sm_conn) break; 25253deb3ec6SMatthias Ringwald 2526711e6c80SMatthias Ringwald sm_conn->sm_handle = con_handle; 25273deb3ec6SMatthias Ringwald sm_conn->sm_role = packet[6]; 25283deb3ec6SMatthias Ringwald sm_conn->sm_peer_addr_type = packet[7]; 2529724d70a2SMatthias Ringwald reverse_bd_addr(&packet[8], 2530724d70a2SMatthias Ringwald sm_conn->sm_peer_address); 25313deb3ec6SMatthias Ringwald 25323deb3ec6SMatthias Ringwald log_info("New sm_conn, role %s", sm_conn->sm_role ? "slave" : "master"); 25333deb3ec6SMatthias Ringwald 25343deb3ec6SMatthias Ringwald // reset security properties 25353deb3ec6SMatthias Ringwald sm_conn->sm_connection_encrypted = 0; 25363deb3ec6SMatthias Ringwald sm_conn->sm_connection_authenticated = 0; 25373deb3ec6SMatthias Ringwald sm_conn->sm_connection_authorization_state = AUTHORIZATION_UNKNOWN; 25383deb3ec6SMatthias Ringwald sm_conn->sm_le_db_index = -1; 25393deb3ec6SMatthias Ringwald 25403deb3ec6SMatthias Ringwald // prepare CSRK lookup (does not involve setup) 25413deb3ec6SMatthias Ringwald sm_conn->sm_irk_lookup_state = IRK_LOOKUP_W4_READY; 25423deb3ec6SMatthias Ringwald 25433deb3ec6SMatthias Ringwald // just connected -> everything else happens in sm_run() 25443deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 25453deb3ec6SMatthias Ringwald // slave - state already could be SM_RESPONDER_SEND_SECURITY_REQUEST instead 25463deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){ 25473deb3ec6SMatthias Ringwald if (sm_slave_request_security) { 25483deb3ec6SMatthias Ringwald // request security if requested by app 25493deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST; 25503deb3ec6SMatthias Ringwald } else { 25513deb3ec6SMatthias Ringwald // otherwise, wait for pairing request 25523deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_IDLE; 25533deb3ec6SMatthias Ringwald } 25543deb3ec6SMatthias Ringwald } 25553deb3ec6SMatthias Ringwald break; 25563deb3ec6SMatthias Ringwald } else { 25573deb3ec6SMatthias Ringwald // master 25583deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED; 25593deb3ec6SMatthias Ringwald } 25603deb3ec6SMatthias Ringwald break; 25613deb3ec6SMatthias Ringwald 25623deb3ec6SMatthias Ringwald case HCI_SUBEVENT_LE_LONG_TERM_KEY_REQUEST: 2563711e6c80SMatthias Ringwald con_handle = little_endian_read_16(packet, 3); 2564711e6c80SMatthias Ringwald sm_conn = sm_get_connection_for_handle(con_handle); 25653deb3ec6SMatthias Ringwald if (!sm_conn) break; 25663deb3ec6SMatthias Ringwald 25673deb3ec6SMatthias Ringwald log_info("LTK Request: state %u", sm_conn->sm_engine_state); 25683deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_RESPONDER_PH2_W4_LTK_REQUEST){ 25693deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_CALC_STK; 25703deb3ec6SMatthias Ringwald break; 25713deb3ec6SMatthias Ringwald } 2572c6b7cbd9SMatthias Ringwald if (sm_conn->sm_engine_state == SM_SC_W4_LTK_REQUEST_SC){ 2573e53be891SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY; 2574e53be891SMatthias Ringwald break; 2575e53be891SMatthias Ringwald } 25763deb3ec6SMatthias Ringwald 25773deb3ec6SMatthias Ringwald // assume that we don't have a LTK for ediv == 0 and random == null 2578f8fbdce0SMatthias Ringwald if (little_endian_read_16(packet, 13) == 0 && sm_is_null_random(&packet[5])){ 25793deb3ec6SMatthias Ringwald log_info("LTK Request: ediv & random are empty"); 25803deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY; 25813deb3ec6SMatthias Ringwald break; 25823deb3ec6SMatthias Ringwald } 25833deb3ec6SMatthias Ringwald 25843deb3ec6SMatthias Ringwald // store rand and ediv 25859c80e4ccSMatthias Ringwald reverse_64(&packet[5], sm_conn->sm_local_rand); 2586f8fbdce0SMatthias Ringwald sm_conn->sm_local_ediv = little_endian_read_16(packet, 13); 25873deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_PH0_RECEIVED_LTK; 25883deb3ec6SMatthias Ringwald break; 25893deb3ec6SMatthias Ringwald 25903deb3ec6SMatthias Ringwald default: 25913deb3ec6SMatthias Ringwald break; 25923deb3ec6SMatthias Ringwald } 25933deb3ec6SMatthias Ringwald break; 25943deb3ec6SMatthias Ringwald 25953deb3ec6SMatthias Ringwald case HCI_EVENT_ENCRYPTION_CHANGE: 2596711e6c80SMatthias Ringwald con_handle = little_endian_read_16(packet, 3); 2597711e6c80SMatthias Ringwald sm_conn = sm_get_connection_for_handle(con_handle); 25983deb3ec6SMatthias Ringwald if (!sm_conn) break; 25993deb3ec6SMatthias Ringwald 26003deb3ec6SMatthias Ringwald sm_conn->sm_connection_encrypted = packet[5]; 26013deb3ec6SMatthias Ringwald log_info("Encryption state change: %u, key size %u", sm_conn->sm_connection_encrypted, 26023deb3ec6SMatthias Ringwald sm_conn->sm_actual_encryption_key_size); 26033deb3ec6SMatthias Ringwald log_info("event handler, state %u", sm_conn->sm_engine_state); 26043deb3ec6SMatthias Ringwald if (!sm_conn->sm_connection_encrypted) break; 26053deb3ec6SMatthias Ringwald // continue if part of initial pairing 26063deb3ec6SMatthias Ringwald switch (sm_conn->sm_engine_state){ 26073deb3ec6SMatthias Ringwald case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED: 26083deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED; 26093deb3ec6SMatthias Ringwald sm_done_for_handle(sm_conn->sm_handle); 26103deb3ec6SMatthias Ringwald break; 26113deb3ec6SMatthias Ringwald case SM_PH2_W4_CONNECTION_ENCRYPTED: 26123deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 26133deb3ec6SMatthias Ringwald // slave 26143deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_GET_RANDOM; 26153deb3ec6SMatthias Ringwald } else { 26163deb3ec6SMatthias Ringwald // master 26173deb3ec6SMatthias Ringwald if (sm_key_distribution_all_received(sm_conn)){ 26183deb3ec6SMatthias Ringwald // skip receiving keys as there are none 26193deb3ec6SMatthias Ringwald sm_key_distribution_handle_all_received(sm_conn); 26203deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_GET_RANDOM; 26213deb3ec6SMatthias Ringwald } else { 26223deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS; 26233deb3ec6SMatthias Ringwald } 26243deb3ec6SMatthias Ringwald } 26253deb3ec6SMatthias Ringwald break; 26263deb3ec6SMatthias Ringwald default: 26273deb3ec6SMatthias Ringwald break; 26283deb3ec6SMatthias Ringwald } 26293deb3ec6SMatthias Ringwald break; 26303deb3ec6SMatthias Ringwald 26313deb3ec6SMatthias Ringwald case HCI_EVENT_ENCRYPTION_KEY_REFRESH_COMPLETE: 2632711e6c80SMatthias Ringwald con_handle = little_endian_read_16(packet, 3); 2633711e6c80SMatthias Ringwald sm_conn = sm_get_connection_for_handle(con_handle); 26343deb3ec6SMatthias Ringwald if (!sm_conn) break; 26353deb3ec6SMatthias Ringwald 26363deb3ec6SMatthias Ringwald log_info("Encryption key refresh complete, key size %u", sm_conn->sm_actual_encryption_key_size); 26373deb3ec6SMatthias Ringwald log_info("event handler, state %u", sm_conn->sm_engine_state); 26383deb3ec6SMatthias Ringwald // continue if part of initial pairing 26393deb3ec6SMatthias Ringwald switch (sm_conn->sm_engine_state){ 26403deb3ec6SMatthias Ringwald case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED: 26413deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED; 26423deb3ec6SMatthias Ringwald sm_done_for_handle(sm_conn->sm_handle); 26433deb3ec6SMatthias Ringwald break; 26443deb3ec6SMatthias Ringwald case SM_PH2_W4_CONNECTION_ENCRYPTED: 26453deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 26463deb3ec6SMatthias Ringwald // slave 26473deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_GET_RANDOM; 26483deb3ec6SMatthias Ringwald } else { 26493deb3ec6SMatthias Ringwald // master 26503deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS; 26513deb3ec6SMatthias Ringwald } 26523deb3ec6SMatthias Ringwald break; 26533deb3ec6SMatthias Ringwald default: 26543deb3ec6SMatthias Ringwald break; 26553deb3ec6SMatthias Ringwald } 26563deb3ec6SMatthias Ringwald break; 26573deb3ec6SMatthias Ringwald 26583deb3ec6SMatthias Ringwald 26593deb3ec6SMatthias Ringwald case HCI_EVENT_DISCONNECTION_COMPLETE: 2660711e6c80SMatthias Ringwald con_handle = little_endian_read_16(packet, 3); 2661711e6c80SMatthias Ringwald sm_done_for_handle(con_handle); 2662711e6c80SMatthias Ringwald sm_conn = sm_get_connection_for_handle(con_handle); 26633deb3ec6SMatthias Ringwald if (!sm_conn) break; 26643deb3ec6SMatthias Ringwald 26653deb3ec6SMatthias Ringwald // delete stored bonding on disconnect with authentication failure in ph0 26663deb3ec6SMatthias Ringwald if (sm_conn->sm_role == 0 26673deb3ec6SMatthias Ringwald && sm_conn->sm_engine_state == SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED 26683deb3ec6SMatthias Ringwald && packet[2] == ERROR_CODE_AUTHENTICATION_FAILURE){ 26693deb3ec6SMatthias Ringwald le_device_db_remove(sm_conn->sm_le_db_index); 26703deb3ec6SMatthias Ringwald } 26713deb3ec6SMatthias Ringwald 26723deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_GENERAL_IDLE; 26733deb3ec6SMatthias Ringwald sm_conn->sm_handle = 0; 26743deb3ec6SMatthias Ringwald break; 26753deb3ec6SMatthias Ringwald 26763deb3ec6SMatthias Ringwald case HCI_EVENT_COMMAND_COMPLETE: 2677073bd0faSMatthias Ringwald if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_encrypt)){ 26783deb3ec6SMatthias Ringwald sm_handle_encryption_result(&packet[6]); 26793deb3ec6SMatthias Ringwald break; 26803deb3ec6SMatthias Ringwald } 2681073bd0faSMatthias Ringwald if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_rand)){ 26823deb3ec6SMatthias Ringwald sm_handle_random_result(&packet[6]); 26833deb3ec6SMatthias Ringwald break; 26843deb3ec6SMatthias Ringwald } 268565b44ffdSMatthias Ringwald break; 268665b44ffdSMatthias Ringwald default: 268765b44ffdSMatthias Ringwald break; 26883deb3ec6SMatthias Ringwald } 268965b44ffdSMatthias Ringwald break; 269065b44ffdSMatthias Ringwald default: 269165b44ffdSMatthias Ringwald break; 26923deb3ec6SMatthias Ringwald } 26933deb3ec6SMatthias Ringwald 26943deb3ec6SMatthias Ringwald sm_run(); 26953deb3ec6SMatthias Ringwald } 26963deb3ec6SMatthias Ringwald 26973deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other){ 26983deb3ec6SMatthias Ringwald if (other < sm_min_encryption_key_size) return 0; 26993deb3ec6SMatthias Ringwald if (other < sm_max_encryption_key_size) return other; 27003deb3ec6SMatthias Ringwald return sm_max_encryption_key_size; 27013deb3ec6SMatthias Ringwald } 27023deb3ec6SMatthias Ringwald 2703688a08f9SMatthias Ringwald static int sm_passkey_used(stk_generation_method_t method){ 2704688a08f9SMatthias Ringwald switch (method){ 2705688a08f9SMatthias Ringwald case PK_RESP_INPUT: 2706688a08f9SMatthias Ringwald case PK_INIT_INPUT: 2707688a08f9SMatthias Ringwald case OK_BOTH_INPUT: 2708688a08f9SMatthias Ringwald return 1; 2709688a08f9SMatthias Ringwald default: 2710688a08f9SMatthias Ringwald return 0; 2711688a08f9SMatthias Ringwald } 2712688a08f9SMatthias Ringwald } 2713688a08f9SMatthias Ringwald 27143deb3ec6SMatthias Ringwald /** 27153deb3ec6SMatthias Ringwald * @return ok 27163deb3ec6SMatthias Ringwald */ 27173deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void){ 27183deb3ec6SMatthias Ringwald // check if STK generation method is acceptable by client 27193deb3ec6SMatthias Ringwald switch (setup->sm_stk_generation_method){ 27203deb3ec6SMatthias Ringwald case JUST_WORKS: 27213deb3ec6SMatthias Ringwald return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_JUST_WORKS) != 0; 27223deb3ec6SMatthias Ringwald case PK_RESP_INPUT: 27233deb3ec6SMatthias Ringwald case PK_INIT_INPUT: 27243deb3ec6SMatthias Ringwald case OK_BOTH_INPUT: 27253deb3ec6SMatthias Ringwald return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_PASSKEY) != 0; 27263deb3ec6SMatthias Ringwald case OOB: 27273deb3ec6SMatthias Ringwald return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_OOB) != 0; 2728446a8c36SMatthias Ringwald case NK_BOTH_INPUT: 2729b4343428SMatthias Ringwald return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON) != 0; 2730446a8c36SMatthias Ringwald return 1; 27313deb3ec6SMatthias Ringwald default: 27323deb3ec6SMatthias Ringwald return 0; 27333deb3ec6SMatthias Ringwald } 27343deb3ec6SMatthias Ringwald } 27353deb3ec6SMatthias Ringwald 2736711e6c80SMatthias Ringwald static void sm_pdu_handler(uint8_t packet_type, hci_con_handle_t con_handle, uint8_t *packet, uint16_t size){ 27373deb3ec6SMatthias Ringwald 2738b170b20fSMatthias Ringwald if (packet_type == HCI_EVENT_PACKET && packet[0] == L2CAP_EVENT_CAN_SEND_NOW){ 2739b170b20fSMatthias Ringwald sm_run(); 2740b170b20fSMatthias Ringwald } 2741b170b20fSMatthias Ringwald 27423deb3ec6SMatthias Ringwald if (packet_type != SM_DATA_PACKET) return; 27433deb3ec6SMatthias Ringwald 2744711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 27453deb3ec6SMatthias Ringwald if (!sm_conn) return; 27463deb3ec6SMatthias Ringwald 27473deb3ec6SMatthias Ringwald if (packet[0] == SM_CODE_PAIRING_FAILED){ 27483deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = sm_conn->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED; 27493deb3ec6SMatthias Ringwald return; 27503deb3ec6SMatthias Ringwald } 27513deb3ec6SMatthias Ringwald 2752e03e489aSMatthias Ringwald log_debug("sm_pdu_handler: state %u, pdu 0x%02x", sm_conn->sm_engine_state, packet[0]); 27533deb3ec6SMatthias Ringwald 27543deb3ec6SMatthias Ringwald int err; 27553deb3ec6SMatthias Ringwald 27563deb3ec6SMatthias Ringwald switch (sm_conn->sm_engine_state){ 27573deb3ec6SMatthias Ringwald 27583deb3ec6SMatthias Ringwald // a sm timeout requries a new physical connection 27593deb3ec6SMatthias Ringwald case SM_GENERAL_TIMEOUT: 27603deb3ec6SMatthias Ringwald return; 27613deb3ec6SMatthias Ringwald 27623deb3ec6SMatthias Ringwald // Initiator 27633deb3ec6SMatthias Ringwald case SM_INITIATOR_CONNECTED: 27643deb3ec6SMatthias Ringwald if ((packet[0] != SM_CODE_SECURITY_REQUEST) || (sm_conn->sm_role)){ 27653deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 27663deb3ec6SMatthias Ringwald break; 27673deb3ec6SMatthias Ringwald } 27683deb3ec6SMatthias Ringwald if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_FAILED){ 27693deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 27703deb3ec6SMatthias Ringwald break; 27713deb3ec6SMatthias Ringwald } 27723deb3ec6SMatthias Ringwald if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_SUCCEEDED){ 27733deb3ec6SMatthias Ringwald uint16_t ediv; 27743deb3ec6SMatthias Ringwald le_device_db_encryption_get(sm_conn->sm_le_db_index, &ediv, NULL, NULL, NULL, NULL, NULL); 27753deb3ec6SMatthias Ringwald if (ediv){ 27763deb3ec6SMatthias Ringwald log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index); 27773deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK; 27783deb3ec6SMatthias Ringwald } else { 27793deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 27803deb3ec6SMatthias Ringwald } 27813deb3ec6SMatthias Ringwald break; 27823deb3ec6SMatthias Ringwald } 27833deb3ec6SMatthias Ringwald // otherwise, store security request 27843deb3ec6SMatthias Ringwald sm_conn->sm_security_request_received = 1; 27853deb3ec6SMatthias Ringwald break; 27863deb3ec6SMatthias Ringwald 27873deb3ec6SMatthias Ringwald case SM_INITIATOR_PH1_W4_PAIRING_RESPONSE: 27883deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_RESPONSE){ 27893deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 27903deb3ec6SMatthias Ringwald break; 27913deb3ec6SMatthias Ringwald } 27923deb3ec6SMatthias Ringwald // store pairing request 27933deb3ec6SMatthias Ringwald memcpy(&setup->sm_s_pres, packet, sizeof(sm_pairing_packet_t)); 27943deb3ec6SMatthias Ringwald err = sm_stk_generation_init(sm_conn); 27953deb3ec6SMatthias Ringwald if (err){ 27963deb3ec6SMatthias Ringwald setup->sm_pairing_failed_reason = err; 27973deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED; 27983deb3ec6SMatthias Ringwald break; 27993deb3ec6SMatthias Ringwald } 2800136d331aSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 2801136d331aSMatthias Ringwald if (setup->sm_use_secure_connections){ 28028cba5ca3SMatthias Ringwald // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged 28038cba5ca3SMatthias Ringwald if (setup->sm_stk_generation_method == JUST_WORKS){ 2804136d331aSMatthias Ringwald sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE; 2805136d331aSMatthias Ringwald sm_trigger_user_response(sm_conn); 2806136d331aSMatthias Ringwald if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){ 2807c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND; 2808136d331aSMatthias Ringwald } 28098cba5ca3SMatthias Ringwald } else { 2810c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND; 28118cba5ca3SMatthias Ringwald } 2812136d331aSMatthias Ringwald break; 2813136d331aSMatthias Ringwald } 2814136d331aSMatthias Ringwald #endif 28153deb3ec6SMatthias Ringwald // generate random number first, if we need to show passkey 28163deb3ec6SMatthias Ringwald if (setup->sm_stk_generation_method == PK_RESP_INPUT){ 28173deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_GET_RANDOM_TK; 28183deb3ec6SMatthias Ringwald break; 28193deb3ec6SMatthias Ringwald } 28203deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE; 28213deb3ec6SMatthias Ringwald sm_trigger_user_response(sm_conn); 28223deb3ec6SMatthias Ringwald // response_idle == nothing <--> sm_trigger_user_response() did not require response 28233deb3ec6SMatthias Ringwald if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){ 28243deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A; 28253deb3ec6SMatthias Ringwald } 28263deb3ec6SMatthias Ringwald break; 28273deb3ec6SMatthias Ringwald 28283deb3ec6SMatthias Ringwald case SM_INITIATOR_PH2_W4_PAIRING_CONFIRM: 28293deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_CONFIRM){ 28303deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 28313deb3ec6SMatthias Ringwald break; 28323deb3ec6SMatthias Ringwald } 28333deb3ec6SMatthias Ringwald 28343deb3ec6SMatthias Ringwald // store s_confirm 28359c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_confirm); 28363deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM; 28373deb3ec6SMatthias Ringwald break; 28383deb3ec6SMatthias Ringwald 28393deb3ec6SMatthias Ringwald case SM_INITIATOR_PH2_W4_PAIRING_RANDOM: 28403deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_RANDOM){ 28413deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 28423deb3ec6SMatthias Ringwald break;; 28433deb3ec6SMatthias Ringwald } 28443deb3ec6SMatthias Ringwald 28453deb3ec6SMatthias Ringwald // received random value 28469c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_random); 28473deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C; 28483deb3ec6SMatthias Ringwald break; 28493deb3ec6SMatthias Ringwald 28503deb3ec6SMatthias Ringwald // Responder 28513deb3ec6SMatthias Ringwald case SM_RESPONDER_IDLE: 28523deb3ec6SMatthias Ringwald case SM_RESPONDER_SEND_SECURITY_REQUEST: 28533deb3ec6SMatthias Ringwald case SM_RESPONDER_PH1_W4_PAIRING_REQUEST: 28543deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_REQUEST){ 28553deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 28563deb3ec6SMatthias Ringwald break;; 28573deb3ec6SMatthias Ringwald } 28583deb3ec6SMatthias Ringwald 28593deb3ec6SMatthias Ringwald // store pairing request 28603deb3ec6SMatthias Ringwald memcpy(&sm_conn->sm_m_preq, packet, sizeof(sm_pairing_packet_t)); 28613deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED; 28623deb3ec6SMatthias Ringwald break; 28633deb3ec6SMatthias Ringwald 286427c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 2865c6b7cbd9SMatthias Ringwald case SM_SC_W4_PUBLIC_KEY_COMMAND: 286627c32905SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_PUBLIC_KEY){ 286727c32905SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 286827c32905SMatthias Ringwald break; 286927c32905SMatthias Ringwald } 2870bccf5e67SMatthias Ringwald 2871e53be891SMatthias Ringwald // store public key for DH Key calculation 2872e53be891SMatthias Ringwald reverse_256(&packet[01], setup->sm_peer_qx); 2873e53be891SMatthias Ringwald reverse_256(&packet[33], setup->sm_peer_qy); 2874bccf5e67SMatthias Ringwald 2875bccf5e67SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 2876bccf5e67SMatthias Ringwald // validate public key 2877bccf5e67SMatthias Ringwald mbedtls_ecp_group grp; 2878bccf5e67SMatthias Ringwald mbedtls_ecp_group_init( &grp ); 2879bccf5e67SMatthias Ringwald mbedtls_ecp_group_load(&grp, MBEDTLS_ECP_DP_SECP256R1); 2880bccf5e67SMatthias Ringwald 2881bccf5e67SMatthias Ringwald mbedtls_ecp_point Q; 2882bccf5e67SMatthias Ringwald mbedtls_ecp_point_init( &Q ); 2883bccf5e67SMatthias Ringwald mbedtls_mpi_read_binary(&Q.X, setup->sm_peer_qx, 32); 2884bccf5e67SMatthias Ringwald mbedtls_mpi_read_binary(&Q.Y, setup->sm_peer_qy, 32); 2885bccf5e67SMatthias Ringwald mbedtls_mpi_read_string(&Q.Z, 16, "1" ); 2886bccf5e67SMatthias Ringwald err = mbedtls_ecp_check_pubkey(&grp, &Q); 2887bccf5e67SMatthias Ringwald if (err){ 2888bccf5e67SMatthias Ringwald log_error("sm: peer public key invalid %x", err); 2889bccf5e67SMatthias Ringwald // uses "unspecified reason", there is no "public key invalid" error code 2890bccf5e67SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 2891bccf5e67SMatthias Ringwald break; 2892bccf5e67SMatthias Ringwald } 2893bccf5e67SMatthias Ringwald #endif 2894136d331aSMatthias Ringwald if (sm_conn->sm_role){ 2895136d331aSMatthias Ringwald // responder 2896c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND; 2897136d331aSMatthias Ringwald } else { 2898136d331aSMatthias Ringwald // initiator 2899a1e31e9cSMatthias Ringwald // stk generation method 2900a1e31e9cSMatthias Ringwald // passkey entry: notify app to show passkey or to request passkey 2901a1e31e9cSMatthias Ringwald switch (setup->sm_stk_generation_method){ 2902a1e31e9cSMatthias Ringwald case JUST_WORKS: 2903a1e31e9cSMatthias Ringwald case NK_BOTH_INPUT: 2904c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W4_CONFIRMATION; 2905a1e31e9cSMatthias Ringwald break; 2906a1e31e9cSMatthias Ringwald case PK_INIT_INPUT: 2907a1e31e9cSMatthias Ringwald case PK_RESP_INPUT: 2908a1e31e9cSMatthias Ringwald case OK_BOTH_INPUT: 2909aec94140SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION; 2910a1e31e9cSMatthias Ringwald break; 2911a1e31e9cSMatthias Ringwald case OOB: 2912a1e31e9cSMatthias Ringwald // TODO: implement SC OOB 2913a1e31e9cSMatthias Ringwald break; 2914a1e31e9cSMatthias Ringwald } 2915136d331aSMatthias Ringwald } 291627c32905SMatthias Ringwald break; 2917e53be891SMatthias Ringwald 2918c6b7cbd9SMatthias Ringwald case SM_SC_W4_CONFIRMATION: 291945a61d50SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_CONFIRM){ 292045a61d50SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 292145a61d50SMatthias Ringwald break; 292245a61d50SMatthias Ringwald } 292345a61d50SMatthias Ringwald // received confirm value 292445a61d50SMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_confirm); 292545a61d50SMatthias Ringwald 292645a61d50SMatthias Ringwald if (sm_conn->sm_role){ 292745a61d50SMatthias Ringwald // responder 2928aec94140SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION; 292945a61d50SMatthias Ringwald } else { 293045a61d50SMatthias Ringwald // initiator 2931c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM; 293245a61d50SMatthias Ringwald } 293345a61d50SMatthias Ringwald break; 293445a61d50SMatthias Ringwald 2935c6b7cbd9SMatthias Ringwald case SM_SC_W4_PAIRING_RANDOM: 2936e53be891SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_RANDOM){ 2937e53be891SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 2938136d331aSMatthias Ringwald break; 2939e53be891SMatthias Ringwald } 2940e53be891SMatthias Ringwald 2941e53be891SMatthias Ringwald // received random value 2942e53be891SMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_nonce); 2943e53be891SMatthias Ringwald 29445a293e6eSMatthias Ringwald // validate confirm value if Cb = f4(Pkb, Pka, Nb, z) 29455a293e6eSMatthias Ringwald // only check for JUST WORK/NC in initiator role AND passkey entry 2946688a08f9SMatthias Ringwald int passkey_entry = sm_passkey_used(setup->sm_stk_generation_method); 29475a293e6eSMatthias Ringwald if (sm_conn->sm_role || passkey_entry) { 2948688a08f9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION; 29495a293e6eSMatthias Ringwald } 29506f52a196SMatthias Ringwald 2951688a08f9SMatthias Ringwald sm_sc_state_after_receiving_random(sm_conn); 2952e53be891SMatthias Ringwald break; 2953e53be891SMatthias Ringwald 2954c6b7cbd9SMatthias Ringwald case SM_SC_W4_DHKEY_CHECK_COMMAND: 2955e53be891SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_DHKEY_CHECK){ 2956e53be891SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 2957e53be891SMatthias Ringwald break; 2958e53be891SMatthias Ringwald } 2959e53be891SMatthias Ringwald // store DHKey Check 2960e53be891SMatthias Ringwald reverse_128(&packet[01], setup->sm_peer_dhkey_check); 2961446a8c36SMatthias Ringwald 2962a9f29768SMatthias Ringwald // validate E = f6() 2963a9f29768SMatthias Ringwald sm_key56_t bd_addr_master, bd_addr_slave; 2964a9f29768SMatthias Ringwald bd_addr_master[0] = setup->sm_m_addr_type; 2965a9f29768SMatthias Ringwald bd_addr_slave[0] = setup->sm_s_addr_type; 2966a9f29768SMatthias Ringwald memcpy(&bd_addr_master[1], setup->sm_m_address, 6); 2967a9f29768SMatthias Ringwald memcpy(&bd_addr_slave[1], setup->sm_s_address, 6); 2968a9f29768SMatthias Ringwald 2969a9f29768SMatthias Ringwald uint8_t iocap_a[3]; 2970a9f29768SMatthias Ringwald iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq); 2971a9f29768SMatthias Ringwald iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq); 2972a9f29768SMatthias Ringwald iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq); 2973a9f29768SMatthias Ringwald uint8_t iocap_b[3]; 2974a9f29768SMatthias Ringwald iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres); 2975a9f29768SMatthias Ringwald iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres); 2976a9f29768SMatthias Ringwald iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres); 2977a9f29768SMatthias Ringwald sm_key_t peer_dhkey_check; 2978a9f29768SMatthias Ringwald if (sm_conn->sm_role){ 2979a9f29768SMatthias Ringwald // responder 2980a9f29768SMatthias Ringwald f6(peer_dhkey_check, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_rb, iocap_a, bd_addr_master, bd_addr_slave); 2981a9f29768SMatthias Ringwald } else { 2982a9f29768SMatthias Ringwald // initiator 2983a9f29768SMatthias Ringwald f6(peer_dhkey_check, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_ra, iocap_b, bd_addr_slave, bd_addr_master); 2984a9f29768SMatthias Ringwald } 2985a9f29768SMatthias Ringwald 2986a9f29768SMatthias Ringwald if (0 != memcmp(setup->sm_peer_dhkey_check, peer_dhkey_check, 16) ){ 2987a9f29768SMatthias Ringwald sm_pairing_error(sm_conn, SM_REASON_DHKEY_CHECK_FAILED); 2988a9f29768SMatthias Ringwald break; 2989a9f29768SMatthias Ringwald } 2990136d331aSMatthias Ringwald 2991136d331aSMatthias Ringwald if (sm_conn->sm_role){ 2992a1e31e9cSMatthias Ringwald // responder 2993446a8c36SMatthias Ringwald // for numeric comparison, we need to wait for user confirm 2994446a8c36SMatthias Ringwald if (setup->sm_stk_generation_method == NK_BOTH_INPUT && setup->sm_user_response != SM_USER_RESPONSE_CONFIRM){ 2995c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE; 2996446a8c36SMatthias Ringwald } else { 2997dc300847SMatthias Ringwald sm_sc_prepare_dhkey_check(sm_conn); 2998446a8c36SMatthias Ringwald } 2999136d331aSMatthias Ringwald } else { 3000a1e31e9cSMatthias Ringwald // initiator 3001136d331aSMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION; 3002136d331aSMatthias Ringwald } 3003e53be891SMatthias Ringwald break; 300427c32905SMatthias Ringwald #endif 300527c32905SMatthias Ringwald 30063deb3ec6SMatthias Ringwald case SM_RESPONDER_PH1_W4_PAIRING_CONFIRM: 30073deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_CONFIRM){ 30083deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 300927c32905SMatthias Ringwald break; 30103deb3ec6SMatthias Ringwald } 30113deb3ec6SMatthias Ringwald 30123deb3ec6SMatthias Ringwald // received confirm value 30139c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_confirm); 30143deb3ec6SMatthias Ringwald 30153deb3ec6SMatthias Ringwald // notify client to hide shown passkey 30163deb3ec6SMatthias Ringwald if (setup->sm_stk_generation_method == PK_INIT_INPUT){ 30175611a760SMatthias 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); 30183deb3ec6SMatthias Ringwald } 30193deb3ec6SMatthias Ringwald 30203deb3ec6SMatthias Ringwald // handle user cancel pairing? 30213deb3ec6SMatthias Ringwald if (setup->sm_user_response == SM_USER_RESPONSE_DECLINE){ 30223deb3ec6SMatthias Ringwald setup->sm_pairing_failed_reason = SM_REASON_PASSKEYT_ENTRY_FAILED; 30233deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED; 30243deb3ec6SMatthias Ringwald break; 30253deb3ec6SMatthias Ringwald } 30263deb3ec6SMatthias Ringwald 30273deb3ec6SMatthias Ringwald // wait for user action? 30283deb3ec6SMatthias Ringwald if (setup->sm_user_response == SM_USER_RESPONSE_PENDING){ 30293deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE; 30303deb3ec6SMatthias Ringwald break; 30313deb3ec6SMatthias Ringwald } 30323deb3ec6SMatthias Ringwald 30333deb3ec6SMatthias Ringwald // calculate and send local_confirm 30343deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A; 30353deb3ec6SMatthias Ringwald break; 30363deb3ec6SMatthias Ringwald 30373deb3ec6SMatthias Ringwald case SM_RESPONDER_PH2_W4_PAIRING_RANDOM: 30383deb3ec6SMatthias Ringwald if (packet[0] != SM_CODE_PAIRING_RANDOM){ 30393deb3ec6SMatthias Ringwald sm_pdu_received_in_wrong_state(sm_conn); 30403deb3ec6SMatthias Ringwald break;; 30413deb3ec6SMatthias Ringwald } 30423deb3ec6SMatthias Ringwald 30433deb3ec6SMatthias Ringwald // received random value 30449c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_random); 30453deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C; 30463deb3ec6SMatthias Ringwald break; 30473deb3ec6SMatthias Ringwald 30483deb3ec6SMatthias Ringwald case SM_PH3_RECEIVE_KEYS: 30493deb3ec6SMatthias Ringwald switch(packet[0]){ 30503deb3ec6SMatthias Ringwald case SM_CODE_ENCRYPTION_INFORMATION: 30513deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION; 30529c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_ltk); 30533deb3ec6SMatthias Ringwald break; 30543deb3ec6SMatthias Ringwald 30553deb3ec6SMatthias Ringwald case SM_CODE_MASTER_IDENTIFICATION: 30563deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION; 3057f8fbdce0SMatthias Ringwald setup->sm_peer_ediv = little_endian_read_16(packet, 1); 30589c80e4ccSMatthias Ringwald reverse_64(&packet[3], setup->sm_peer_rand); 30593deb3ec6SMatthias Ringwald break; 30603deb3ec6SMatthias Ringwald 30613deb3ec6SMatthias Ringwald case SM_CODE_IDENTITY_INFORMATION: 30623deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION; 30639c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_irk); 30643deb3ec6SMatthias Ringwald break; 30653deb3ec6SMatthias Ringwald 30663deb3ec6SMatthias Ringwald case SM_CODE_IDENTITY_ADDRESS_INFORMATION: 30673deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION; 30683deb3ec6SMatthias Ringwald setup->sm_peer_addr_type = packet[1]; 3069724d70a2SMatthias Ringwald reverse_bd_addr(&packet[2], setup->sm_peer_address); 30703deb3ec6SMatthias Ringwald break; 30713deb3ec6SMatthias Ringwald 30723deb3ec6SMatthias Ringwald case SM_CODE_SIGNING_INFORMATION: 30733deb3ec6SMatthias Ringwald setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION; 30749c80e4ccSMatthias Ringwald reverse_128(&packet[1], setup->sm_peer_csrk); 30753deb3ec6SMatthias Ringwald break; 30763deb3ec6SMatthias Ringwald default: 30773deb3ec6SMatthias Ringwald // Unexpected PDU 30783deb3ec6SMatthias Ringwald log_info("Unexpected PDU %u in SM_PH3_RECEIVE_KEYS", packet[0]); 30793deb3ec6SMatthias Ringwald break; 30803deb3ec6SMatthias Ringwald } 30813deb3ec6SMatthias Ringwald // done with key distribution? 30823deb3ec6SMatthias Ringwald if (sm_key_distribution_all_received(sm_conn)){ 30833deb3ec6SMatthias Ringwald 30843deb3ec6SMatthias Ringwald sm_key_distribution_handle_all_received(sm_conn); 30853deb3ec6SMatthias Ringwald 30863deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 30873deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_IDLE; 30883deb3ec6SMatthias Ringwald sm_done_for_handle(sm_conn->sm_handle); 30893deb3ec6SMatthias Ringwald } else { 30903deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_GET_RANDOM; 3091625f00b2SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 3092625f00b2SMatthias Ringwald if (setup->sm_use_secure_connections){ 3093625f00b2SMatthias Ringwald sm_conn->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS; 3094625f00b2SMatthias Ringwald } 3095625f00b2SMatthias Ringwald #endif 30963deb3ec6SMatthias Ringwald } 30973deb3ec6SMatthias Ringwald } 30983deb3ec6SMatthias Ringwald break; 30993deb3ec6SMatthias Ringwald default: 31003deb3ec6SMatthias Ringwald // Unexpected PDU 31013deb3ec6SMatthias Ringwald log_info("Unexpected PDU %u in state %u", packet[0], sm_conn->sm_engine_state); 31023deb3ec6SMatthias Ringwald break; 31033deb3ec6SMatthias Ringwald } 31043deb3ec6SMatthias Ringwald 31053deb3ec6SMatthias Ringwald // try to send preparared packet 31063deb3ec6SMatthias Ringwald sm_run(); 31073deb3ec6SMatthias Ringwald } 31083deb3ec6SMatthias Ringwald 31093deb3ec6SMatthias Ringwald // Security Manager Client API 31103deb3ec6SMatthias Ringwald void sm_register_oob_data_callback( int (*get_oob_data_callback)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data)){ 31113deb3ec6SMatthias Ringwald sm_get_oob_data = get_oob_data_callback; 31123deb3ec6SMatthias Ringwald } 31133deb3ec6SMatthias Ringwald 311489a78d34SMatthias Ringwald void sm_add_event_handler(btstack_packet_callback_registration_t * callback_handler){ 311589a78d34SMatthias Ringwald btstack_linked_list_add_tail(&sm_event_handlers, (btstack_linked_item_t*) callback_handler); 311689a78d34SMatthias Ringwald } 311789a78d34SMatthias Ringwald 31183deb3ec6SMatthias Ringwald void sm_set_accepted_stk_generation_methods(uint8_t accepted_stk_generation_methods){ 31193deb3ec6SMatthias Ringwald sm_accepted_stk_generation_methods = accepted_stk_generation_methods; 31203deb3ec6SMatthias Ringwald } 31213deb3ec6SMatthias Ringwald 31223deb3ec6SMatthias Ringwald void sm_set_encryption_key_size_range(uint8_t min_size, uint8_t max_size){ 31233deb3ec6SMatthias Ringwald sm_min_encryption_key_size = min_size; 31243deb3ec6SMatthias Ringwald sm_max_encryption_key_size = max_size; 31253deb3ec6SMatthias Ringwald } 31263deb3ec6SMatthias Ringwald 31273deb3ec6SMatthias Ringwald void sm_set_authentication_requirements(uint8_t auth_req){ 31283deb3ec6SMatthias Ringwald sm_auth_req = auth_req; 31293deb3ec6SMatthias Ringwald } 31303deb3ec6SMatthias Ringwald 31313deb3ec6SMatthias Ringwald void sm_set_io_capabilities(io_capability_t io_capability){ 31323deb3ec6SMatthias Ringwald sm_io_capabilities = io_capability; 31333deb3ec6SMatthias Ringwald } 31343deb3ec6SMatthias Ringwald 31353deb3ec6SMatthias Ringwald void sm_set_request_security(int enable){ 31363deb3ec6SMatthias Ringwald sm_slave_request_security = enable; 31373deb3ec6SMatthias Ringwald } 31383deb3ec6SMatthias Ringwald 31393deb3ec6SMatthias Ringwald void sm_set_er(sm_key_t er){ 31403deb3ec6SMatthias Ringwald memcpy(sm_persistent_er, er, 16); 31413deb3ec6SMatthias Ringwald } 31423deb3ec6SMatthias Ringwald 31433deb3ec6SMatthias Ringwald void sm_set_ir(sm_key_t ir){ 31443deb3ec6SMatthias Ringwald memcpy(sm_persistent_ir, ir, 16); 31453deb3ec6SMatthias Ringwald } 31463deb3ec6SMatthias Ringwald 31473deb3ec6SMatthias Ringwald // Testing support only 31483deb3ec6SMatthias Ringwald void sm_test_set_irk(sm_key_t irk){ 31493deb3ec6SMatthias Ringwald memcpy(sm_persistent_irk, irk, 16); 31503deb3ec6SMatthias Ringwald sm_persistent_irk_ready = 1; 31513deb3ec6SMatthias Ringwald } 31523deb3ec6SMatthias Ringwald 31533deb3ec6SMatthias Ringwald void sm_test_use_fixed_local_csrk(void){ 31543deb3ec6SMatthias Ringwald test_use_fixed_local_csrk = 1; 31553deb3ec6SMatthias Ringwald } 31563deb3ec6SMatthias Ringwald 31573deb3ec6SMatthias Ringwald void sm_init(void){ 31583deb3ec6SMatthias Ringwald // set some (BTstack default) ER and IR 31593deb3ec6SMatthias Ringwald int i; 31603deb3ec6SMatthias Ringwald sm_key_t er; 31613deb3ec6SMatthias Ringwald sm_key_t ir; 31623deb3ec6SMatthias Ringwald for (i=0;i<16;i++){ 31633deb3ec6SMatthias Ringwald er[i] = 0x30 + i; 31643deb3ec6SMatthias Ringwald ir[i] = 0x90 + i; 31653deb3ec6SMatthias Ringwald } 31663deb3ec6SMatthias Ringwald sm_set_er(er); 31673deb3ec6SMatthias Ringwald sm_set_ir(ir); 31683deb3ec6SMatthias Ringwald // defaults 31693deb3ec6SMatthias Ringwald sm_accepted_stk_generation_methods = SM_STK_GENERATION_METHOD_JUST_WORKS 31703deb3ec6SMatthias Ringwald | SM_STK_GENERATION_METHOD_OOB 3171b4343428SMatthias Ringwald | SM_STK_GENERATION_METHOD_PASSKEY 3172b4343428SMatthias Ringwald | SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON; 3173b4343428SMatthias Ringwald 31743deb3ec6SMatthias Ringwald sm_max_encryption_key_size = 16; 31753deb3ec6SMatthias Ringwald sm_min_encryption_key_size = 7; 31763deb3ec6SMatthias Ringwald 31773deb3ec6SMatthias Ringwald sm_cmac_state = CMAC_IDLE; 31783deb3ec6SMatthias Ringwald dkg_state = DKG_W4_WORKING; 31793deb3ec6SMatthias Ringwald rau_state = RAU_W4_WORKING; 31803deb3ec6SMatthias Ringwald sm_aes128_state = SM_AES128_IDLE; 31813deb3ec6SMatthias Ringwald sm_address_resolution_test = -1; // no private address to resolve yet 31823deb3ec6SMatthias Ringwald sm_address_resolution_ah_calculation_active = 0; 31833deb3ec6SMatthias Ringwald sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE; 31843deb3ec6SMatthias Ringwald sm_address_resolution_general_queue = NULL; 31853deb3ec6SMatthias Ringwald 31863deb3ec6SMatthias Ringwald gap_random_adress_update_period = 15 * 60 * 1000L; 31873deb3ec6SMatthias Ringwald 31883deb3ec6SMatthias Ringwald sm_active_connection = 0; 31893deb3ec6SMatthias Ringwald 31903deb3ec6SMatthias Ringwald test_use_fixed_local_csrk = 0; 31913deb3ec6SMatthias Ringwald 3192e03e489aSMatthias Ringwald // register for HCI Events from HCI 3193e03e489aSMatthias Ringwald hci_event_callback_registration.callback = &sm_event_packet_handler; 3194e03e489aSMatthias Ringwald hci_add_event_handler(&hci_event_callback_registration); 3195e03e489aSMatthias Ringwald 3196b170b20fSMatthias Ringwald // and L2CAP PDUs + L2CAP_EVENT_CAN_SEND_NOW 3197e03e489aSMatthias Ringwald l2cap_register_fixed_channel(sm_pdu_handler, L2CAP_CID_SECURITY_MANAGER_PROTOCOL); 319827c32905SMatthias Ringwald 319927c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH 320027c32905SMatthias Ringwald // TODO: calculate keypair using LE Random Number Generator 320127c32905SMatthias Ringwald // use test keypair from spec initially 320227c32905SMatthias Ringwald mbedtls_ecp_keypair_init(&le_keypair); 320327c32905SMatthias Ringwald mbedtls_ecp_group_load(&le_keypair.grp, MBEDTLS_ECP_DP_SECP256R1); 320427c32905SMatthias Ringwald mbedtls_mpi_read_string( &le_keypair.d, 16, "3f49f6d4a3c55f3874c9b3e3d2103f504aff607beb40b7995899b8a6cd3c1abd"); 320527c32905SMatthias Ringwald mbedtls_mpi_read_string( &le_keypair.Q.X, 16, "20b003d2f297be2c5e2c83a7e9f9a5b9eff49111acf4fddbcc0301480e359de6"); 320627c32905SMatthias Ringwald mbedtls_mpi_read_string( &le_keypair.Q.Y, 16, "dc809c49652aeb6d63329abf5a52155c766345c28fed3024741c8ed01589d28b"); 320727c32905SMatthias Ringwald mbedtls_mpi_read_string( &le_keypair.Q.Z, 16, "1"); 320827c32905SMatthias Ringwald // print keypair 320927c32905SMatthias Ringwald char buffer[100]; 321027c32905SMatthias Ringwald size_t len; 321127c32905SMatthias Ringwald mbedtls_mpi_write_string( &le_keypair.d, 16, buffer, sizeof(buffer), &len); 321227c32905SMatthias Ringwald log_info("d: %s", buffer); 321327c32905SMatthias Ringwald mbedtls_mpi_write_string( &le_keypair.Q.X, 16, buffer, sizeof(buffer), &len); 321427c32905SMatthias Ringwald log_info("X: %s", buffer); 321527c32905SMatthias Ringwald mbedtls_mpi_write_string( &le_keypair.Q.Y, 16, buffer, sizeof(buffer), &len); 321627c32905SMatthias Ringwald log_info("Y: %s", buffer); 321727c32905SMatthias Ringwald #endif 32183deb3ec6SMatthias Ringwald } 32193deb3ec6SMatthias Ringwald 3220711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle){ 3221711e6c80SMatthias Ringwald hci_connection_t * hci_con = hci_connection_for_handle(con_handle); 32223deb3ec6SMatthias Ringwald if (!hci_con) return NULL; 32233deb3ec6SMatthias Ringwald return &hci_con->sm_connection; 32243deb3ec6SMatthias Ringwald } 32253deb3ec6SMatthias Ringwald 32263deb3ec6SMatthias Ringwald // @returns 0 if not encrypted, 7-16 otherwise 3227711e6c80SMatthias Ringwald int sm_encryption_key_size(hci_con_handle_t con_handle){ 3228711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 32293deb3ec6SMatthias Ringwald if (!sm_conn) return 0; // wrong connection 32303deb3ec6SMatthias Ringwald if (!sm_conn->sm_connection_encrypted) return 0; 32313deb3ec6SMatthias Ringwald return sm_conn->sm_actual_encryption_key_size; 32323deb3ec6SMatthias Ringwald } 32333deb3ec6SMatthias Ringwald 3234711e6c80SMatthias Ringwald int sm_authenticated(hci_con_handle_t con_handle){ 3235711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 32363deb3ec6SMatthias Ringwald if (!sm_conn) return 0; // wrong connection 32373deb3ec6SMatthias Ringwald if (!sm_conn->sm_connection_encrypted) return 0; // unencrypted connection cannot be authenticated 32383deb3ec6SMatthias Ringwald return sm_conn->sm_connection_authenticated; 32393deb3ec6SMatthias Ringwald } 32403deb3ec6SMatthias Ringwald 3241711e6c80SMatthias Ringwald authorization_state_t sm_authorization_state(hci_con_handle_t con_handle){ 3242711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 32433deb3ec6SMatthias Ringwald if (!sm_conn) return AUTHORIZATION_UNKNOWN; // wrong connection 32443deb3ec6SMatthias Ringwald if (!sm_conn->sm_connection_encrypted) return AUTHORIZATION_UNKNOWN; // unencrypted connection cannot be authorized 32453deb3ec6SMatthias Ringwald if (!sm_conn->sm_connection_authenticated) return AUTHORIZATION_UNKNOWN; // unauthenticatd connection cannot be authorized 32463deb3ec6SMatthias Ringwald return sm_conn->sm_connection_authorization_state; 32473deb3ec6SMatthias Ringwald } 32483deb3ec6SMatthias Ringwald 32493deb3ec6SMatthias Ringwald static void sm_send_security_request_for_connection(sm_connection_t * sm_conn){ 32503deb3ec6SMatthias Ringwald switch (sm_conn->sm_engine_state){ 32513deb3ec6SMatthias Ringwald case SM_GENERAL_IDLE: 32523deb3ec6SMatthias Ringwald case SM_RESPONDER_IDLE: 32533deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST; 32543deb3ec6SMatthias Ringwald sm_run(); 32553deb3ec6SMatthias Ringwald break; 32563deb3ec6SMatthias Ringwald default: 32573deb3ec6SMatthias Ringwald break; 32583deb3ec6SMatthias Ringwald } 32593deb3ec6SMatthias Ringwald } 32603deb3ec6SMatthias Ringwald 32613deb3ec6SMatthias Ringwald /** 32623deb3ec6SMatthias Ringwald * @brief Trigger Security Request 32633deb3ec6SMatthias Ringwald */ 3264711e6c80SMatthias Ringwald void sm_send_security_request(hci_con_handle_t con_handle){ 3265711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 32663deb3ec6SMatthias Ringwald if (!sm_conn) return; 32673deb3ec6SMatthias Ringwald sm_send_security_request_for_connection(sm_conn); 32683deb3ec6SMatthias Ringwald } 32693deb3ec6SMatthias Ringwald 32703deb3ec6SMatthias Ringwald // request pairing 3271711e6c80SMatthias Ringwald void sm_request_pairing(hci_con_handle_t con_handle){ 3272711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 32733deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 32743deb3ec6SMatthias Ringwald 32753deb3ec6SMatthias Ringwald log_info("sm_request_pairing in role %u, state %u", sm_conn->sm_role, sm_conn->sm_engine_state); 32763deb3ec6SMatthias Ringwald if (sm_conn->sm_role){ 32773deb3ec6SMatthias Ringwald sm_send_security_request_for_connection(sm_conn); 32783deb3ec6SMatthias Ringwald } else { 32793deb3ec6SMatthias Ringwald // used as a trigger to start central/master/initiator security procedures 32803deb3ec6SMatthias Ringwald uint16_t ediv; 32813deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_INITIATOR_CONNECTED){ 32823deb3ec6SMatthias Ringwald switch (sm_conn->sm_irk_lookup_state){ 32833deb3ec6SMatthias Ringwald case IRK_LOOKUP_FAILED: 32843deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 32853deb3ec6SMatthias Ringwald break; 32863deb3ec6SMatthias Ringwald case IRK_LOOKUP_SUCCEEDED: 32873deb3ec6SMatthias Ringwald le_device_db_encryption_get(sm_conn->sm_le_db_index, &ediv, NULL, NULL, NULL, NULL, NULL); 32883deb3ec6SMatthias Ringwald if (ediv){ 32893deb3ec6SMatthias Ringwald log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index); 32903deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK; 32913deb3ec6SMatthias Ringwald } else { 32923deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST; 32933deb3ec6SMatthias Ringwald } 32943deb3ec6SMatthias Ringwald break; 32953deb3ec6SMatthias Ringwald default: 32963deb3ec6SMatthias Ringwald sm_conn->sm_bonding_requested = 1; 32973deb3ec6SMatthias Ringwald break; 32983deb3ec6SMatthias Ringwald } 3299e88b2961SMatthias Ringwald } else if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){ 3300e88b2961SMatthias Ringwald sm_conn->sm_bonding_requested = 1; 33013deb3ec6SMatthias Ringwald } 33023deb3ec6SMatthias Ringwald } 33033deb3ec6SMatthias Ringwald sm_run(); 33043deb3ec6SMatthias Ringwald } 33053deb3ec6SMatthias Ringwald 33063deb3ec6SMatthias Ringwald // called by client app on authorization request 3307711e6c80SMatthias Ringwald void sm_authorization_decline(hci_con_handle_t con_handle){ 3308711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33093deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 33103deb3ec6SMatthias Ringwald sm_conn->sm_connection_authorization_state = AUTHORIZATION_DECLINED; 33115611a760SMatthias 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); 33123deb3ec6SMatthias Ringwald } 33133deb3ec6SMatthias Ringwald 3314711e6c80SMatthias Ringwald void sm_authorization_grant(hci_con_handle_t con_handle){ 3315711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33163deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 33173deb3ec6SMatthias Ringwald sm_conn->sm_connection_authorization_state = AUTHORIZATION_GRANTED; 33185611a760SMatthias 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); 33193deb3ec6SMatthias Ringwald } 33203deb3ec6SMatthias Ringwald 33213deb3ec6SMatthias Ringwald // GAP Bonding API 33223deb3ec6SMatthias Ringwald 3323711e6c80SMatthias Ringwald void sm_bonding_decline(hci_con_handle_t con_handle){ 3324711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33253deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 33263deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_DECLINE; 33273deb3ec6SMatthias Ringwald 33283deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){ 3329de2fd182SMatthias Ringwald switch (setup->sm_stk_generation_method){ 3330de2fd182SMatthias Ringwald case PK_RESP_INPUT: 3331de2fd182SMatthias Ringwald case PK_INIT_INPUT: 3332de2fd182SMatthias Ringwald case OK_BOTH_INPUT: 3333de2fd182SMatthias Ringwald sm_pairing_error(sm_conn, SM_GENERAL_SEND_PAIRING_FAILED); 3334de2fd182SMatthias Ringwald break; 3335de2fd182SMatthias Ringwald case NK_BOTH_INPUT: 3336de2fd182SMatthias Ringwald sm_pairing_error(sm_conn, SM_REASON_NUMERIC_COMPARISON_FAILED); 3337de2fd182SMatthias Ringwald break; 3338de2fd182SMatthias Ringwald case JUST_WORKS: 3339de2fd182SMatthias Ringwald case OOB: 3340de2fd182SMatthias Ringwald sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON); 3341de2fd182SMatthias Ringwald break; 3342de2fd182SMatthias Ringwald } 33433deb3ec6SMatthias Ringwald } 33443deb3ec6SMatthias Ringwald sm_run(); 33453deb3ec6SMatthias Ringwald } 33463deb3ec6SMatthias Ringwald 3347711e6c80SMatthias Ringwald void sm_just_works_confirm(hci_con_handle_t con_handle){ 3348711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33493deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 33503deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_CONFIRM; 33513deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){ 33523deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A; 3353136d331aSMatthias Ringwald 3354136d331aSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS 3355136d331aSMatthias Ringwald if (setup->sm_use_secure_connections){ 3356c6b7cbd9SMatthias Ringwald sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND; 3357136d331aSMatthias Ringwald } 3358136d331aSMatthias Ringwald #endif 33593deb3ec6SMatthias Ringwald } 3360c6b7cbd9SMatthias Ringwald if (sm_conn->sm_engine_state == SM_SC_W4_USER_RESPONSE){ 3361446a8c36SMatthias Ringwald if (sm_conn->sm_role){ 3362446a8c36SMatthias Ringwald // responder 3363dc300847SMatthias Ringwald sm_sc_prepare_dhkey_check(sm_conn); 3364446a8c36SMatthias Ringwald } else { 3365446a8c36SMatthias Ringwald // initiator 3366446a8c36SMatthias Ringwald // TODO handle intiator role 3367446a8c36SMatthias Ringwald } 3368446a8c36SMatthias Ringwald } 33693deb3ec6SMatthias Ringwald sm_run(); 33703deb3ec6SMatthias Ringwald } 33713deb3ec6SMatthias Ringwald 3372c8c46d51SMatthias Ringwald void sm_numeric_comparison_confirm(hci_con_handle_t con_handle){ 3373c8c46d51SMatthias Ringwald // for now, it's the same 3374c8c46d51SMatthias Ringwald sm_just_works_confirm(con_handle); 3375c8c46d51SMatthias Ringwald } 3376c8c46d51SMatthias Ringwald 3377711e6c80SMatthias Ringwald void sm_passkey_input(hci_con_handle_t con_handle, uint32_t passkey){ 3378711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33793deb3ec6SMatthias Ringwald if (!sm_conn) return; // wrong connection 33803deb3ec6SMatthias Ringwald sm_reset_tk(); 3381f8fbdce0SMatthias Ringwald big_endian_store_32(setup->sm_tk, 12, passkey); 33823deb3ec6SMatthias Ringwald setup->sm_user_response = SM_USER_RESPONSE_PASSKEY; 33833deb3ec6SMatthias Ringwald if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){ 33843deb3ec6SMatthias Ringwald sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A; 33853deb3ec6SMatthias Ringwald } 33863deb3ec6SMatthias Ringwald sm_run(); 33873deb3ec6SMatthias Ringwald } 33883deb3ec6SMatthias Ringwald 33893deb3ec6SMatthias Ringwald /** 33903deb3ec6SMatthias Ringwald * @brief Identify device in LE Device DB 33913deb3ec6SMatthias Ringwald * @param handle 33923deb3ec6SMatthias Ringwald * @returns index from le_device_db or -1 if not found/identified 33933deb3ec6SMatthias Ringwald */ 3394711e6c80SMatthias Ringwald int sm_le_device_index(hci_con_handle_t con_handle ){ 3395711e6c80SMatthias Ringwald sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle); 33963deb3ec6SMatthias Ringwald if (!sm_conn) return -1; 33973deb3ec6SMatthias Ringwald return sm_conn->sm_le_db_index; 33983deb3ec6SMatthias Ringwald } 33993deb3ec6SMatthias Ringwald 34003deb3ec6SMatthias Ringwald // GAP LE API 34013deb3ec6SMatthias Ringwald void gap_random_address_set_mode(gap_random_address_type_t random_address_type){ 34023deb3ec6SMatthias Ringwald gap_random_address_update_stop(); 34033deb3ec6SMatthias Ringwald gap_random_adress_type = random_address_type; 34043deb3ec6SMatthias Ringwald if (random_address_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return; 34053deb3ec6SMatthias Ringwald gap_random_address_update_start(); 34063deb3ec6SMatthias Ringwald gap_random_address_trigger(); 34073deb3ec6SMatthias Ringwald } 34083deb3ec6SMatthias Ringwald 34093deb3ec6SMatthias Ringwald gap_random_address_type_t gap_random_address_get_mode(void){ 34103deb3ec6SMatthias Ringwald return gap_random_adress_type; 34113deb3ec6SMatthias Ringwald } 34123deb3ec6SMatthias Ringwald 34133deb3ec6SMatthias Ringwald void gap_random_address_set_update_period(int period_ms){ 34143deb3ec6SMatthias Ringwald gap_random_adress_update_period = period_ms; 34153deb3ec6SMatthias Ringwald if (gap_random_adress_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return; 34163deb3ec6SMatthias Ringwald gap_random_address_update_stop(); 34173deb3ec6SMatthias Ringwald gap_random_address_update_start(); 34183deb3ec6SMatthias Ringwald } 34193deb3ec6SMatthias Ringwald 34207e252622SMatthias Ringwald void gap_random_address_set(bd_addr_t addr){ 34217e252622SMatthias Ringwald gap_random_address_set_mode(GAP_RANDOM_ADDRESS_TYPE_OFF); 34227e252622SMatthias Ringwald memcpy(sm_random_address, addr, 6); 34237e252622SMatthias Ringwald rau_state = RAU_SET_ADDRESS; 34247e252622SMatthias Ringwald sm_run(); 34257e252622SMatthias Ringwald } 34267e252622SMatthias Ringwald 34273deb3ec6SMatthias Ringwald /* 34283deb3ec6SMatthias Ringwald * @brief Set Advertisement Paramters 34293deb3ec6SMatthias Ringwald * @param adv_int_min 34303deb3ec6SMatthias Ringwald * @param adv_int_max 34313deb3ec6SMatthias Ringwald * @param adv_type 34323deb3ec6SMatthias Ringwald * @param direct_address_type 34333deb3ec6SMatthias Ringwald * @param direct_address 34343deb3ec6SMatthias Ringwald * @param channel_map 34353deb3ec6SMatthias Ringwald * @param filter_policy 34363deb3ec6SMatthias Ringwald * 34373deb3ec6SMatthias Ringwald * @note own_address_type is used from gap_random_address_set_mode 34383deb3ec6SMatthias Ringwald */ 34393deb3ec6SMatthias Ringwald void gap_advertisements_set_params(uint16_t adv_int_min, uint16_t adv_int_max, uint8_t adv_type, 34403deb3ec6SMatthias Ringwald uint8_t direct_address_typ, bd_addr_t direct_address, uint8_t channel_map, uint8_t filter_policy){ 34413deb3ec6SMatthias Ringwald hci_le_advertisements_set_params(adv_int_min, adv_int_max, adv_type, gap_random_adress_type, 34423deb3ec6SMatthias Ringwald direct_address_typ, direct_address, channel_map, filter_policy); 34433deb3ec6SMatthias Ringwald } 34443deb3ec6SMatthias Ringwald 3445