xref: /btstack/src/ble/sm.c (revision 1a6822024624aab466a9aff5f67325f81ed6d5e2)
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"
5113377825SMatthias Ringwald #include "hci_dump.h"
520e2df43fSMatthias Ringwald #include "l2cap.h"
533deb3ec6SMatthias Ringwald 
54*1a682202SMatthias Ringwald #if !defined(ENABLE_LE_PERIPHERAL) && !defined(ENABLE_LE_CENTRAL)
55*1a682202SMatthias Ringwald #error "LE Security Manager used, but neither ENABLE_LE_PERIPHERAL nor ENABLE_LE_CENTRAL defined. Please add at least one to btstack_config.h."
56*1a682202SMatthias Ringwald #endif
57*1a682202SMatthias Ringwald 
58e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
597df18c15SMatthias Ringwald #ifdef HAVE_HCI_CONTROLLER_DHKEY_SUPPORT
607df18c15SMatthias Ringwald #error "Support for DHKEY Support in HCI Controller not implemented yet. Please use software implementation"
617df18c15SMatthias Ringwald #else
627df18c15SMatthias Ringwald #define USE_MBEDTLS_FOR_ECDH
637df18c15SMatthias Ringwald #endif
647df18c15SMatthias Ringwald #endif
657df18c15SMatthias Ringwald 
667df18c15SMatthias Ringwald 
6727c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls
6827c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
6927c32905SMatthias Ringwald #include "mbedtls/config.h"
7027c32905SMatthias Ringwald #include "mbedtls/platform.h"
7127c32905SMatthias Ringwald #include "mbedtls/ecp.h"
7268437d83SMatthias Ringwald #include "sm_mbedtls_allocator.h"
73d3bd9600SMatthias Ringwald #endif
74d3bd9600SMatthias Ringwald 
757a766ebfSMatthias Ringwald #if defined(ENABLE_LE_SIGNED_WRITE) || defined(ENABLE_LE_SECURE_CONNECTIONS)
767a766ebfSMatthias Ringwald #define ENABLE_CMAC_ENGINE
777a766ebfSMatthias Ringwald #endif
787a766ebfSMatthias Ringwald 
793deb3ec6SMatthias Ringwald //
803deb3ec6SMatthias Ringwald // SM internal types and globals
813deb3ec6SMatthias Ringwald //
823deb3ec6SMatthias Ringwald 
833deb3ec6SMatthias Ringwald typedef enum {
843deb3ec6SMatthias Ringwald     DKG_W4_WORKING,
853deb3ec6SMatthias Ringwald     DKG_CALC_IRK,
863deb3ec6SMatthias Ringwald     DKG_W4_IRK,
873deb3ec6SMatthias Ringwald     DKG_CALC_DHK,
883deb3ec6SMatthias Ringwald     DKG_W4_DHK,
893deb3ec6SMatthias Ringwald     DKG_READY
903deb3ec6SMatthias Ringwald } derived_key_generation_t;
913deb3ec6SMatthias Ringwald 
923deb3ec6SMatthias Ringwald typedef enum {
933deb3ec6SMatthias Ringwald     RAU_W4_WORKING,
943deb3ec6SMatthias Ringwald     RAU_IDLE,
953deb3ec6SMatthias Ringwald     RAU_GET_RANDOM,
963deb3ec6SMatthias Ringwald     RAU_W4_RANDOM,
973deb3ec6SMatthias Ringwald     RAU_GET_ENC,
983deb3ec6SMatthias Ringwald     RAU_W4_ENC,
993deb3ec6SMatthias Ringwald     RAU_SET_ADDRESS,
1003deb3ec6SMatthias Ringwald } random_address_update_t;
1013deb3ec6SMatthias Ringwald 
1023deb3ec6SMatthias Ringwald typedef enum {
1033deb3ec6SMatthias Ringwald     CMAC_IDLE,
1043deb3ec6SMatthias Ringwald     CMAC_CALC_SUBKEYS,
1053deb3ec6SMatthias Ringwald     CMAC_W4_SUBKEYS,
1063deb3ec6SMatthias Ringwald     CMAC_CALC_MI,
1073deb3ec6SMatthias Ringwald     CMAC_W4_MI,
1083deb3ec6SMatthias Ringwald     CMAC_CALC_MLAST,
1093deb3ec6SMatthias Ringwald     CMAC_W4_MLAST
1103deb3ec6SMatthias Ringwald } cmac_state_t;
1113deb3ec6SMatthias Ringwald 
1123deb3ec6SMatthias Ringwald typedef enum {
1133deb3ec6SMatthias Ringwald     JUST_WORKS,
11427c32905SMatthias Ringwald     PK_RESP_INPUT,  // Initiator displays PK, responder inputs PK
11527c32905SMatthias Ringwald     PK_INIT_INPUT,  // Responder displays PK, initiator inputs PK
1163deb3ec6SMatthias Ringwald     OK_BOTH_INPUT,  // Only input on both, both input PK
11727c32905SMatthias Ringwald     NK_BOTH_INPUT,  // Only numerical compparison (yes/no) on on both sides
1183deb3ec6SMatthias Ringwald     OOB             // OOB available on both sides
1193deb3ec6SMatthias Ringwald } stk_generation_method_t;
1203deb3ec6SMatthias Ringwald 
1213deb3ec6SMatthias Ringwald typedef enum {
1223deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_IDLE,
1233deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_PENDING,
1243deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_CONFIRM,
1253deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_PASSKEY,
1263deb3ec6SMatthias Ringwald     SM_USER_RESPONSE_DECLINE
1273deb3ec6SMatthias Ringwald } sm_user_response_t;
1283deb3ec6SMatthias Ringwald 
1293deb3ec6SMatthias Ringwald typedef enum {
1303deb3ec6SMatthias Ringwald     SM_AES128_IDLE,
1313deb3ec6SMatthias Ringwald     SM_AES128_ACTIVE
1323deb3ec6SMatthias Ringwald } sm_aes128_state_t;
1333deb3ec6SMatthias Ringwald 
1343deb3ec6SMatthias Ringwald typedef enum {
1353deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_IDLE,
1363deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_GENERAL,
1373deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_FOR_CONNECTION,
1383deb3ec6SMatthias Ringwald } address_resolution_mode_t;
1393deb3ec6SMatthias Ringwald 
1403deb3ec6SMatthias Ringwald typedef enum {
1413deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_SUCEEDED,
1423deb3ec6SMatthias Ringwald     ADDRESS_RESOLUTION_FAILED,
1433deb3ec6SMatthias Ringwald } address_resolution_event_t;
144901c000fSMatthias Ringwald 
145901c000fSMatthias Ringwald typedef enum {
1467df18c15SMatthias Ringwald     EC_KEY_GENERATION_IDLE,
1477df18c15SMatthias Ringwald     EC_KEY_GENERATION_ACTIVE,
14809e4d397SMatthias Ringwald     EC_KEY_GENERATION_W4_KEY,
1497df18c15SMatthias Ringwald     EC_KEY_GENERATION_DONE,
1507df18c15SMatthias Ringwald } ec_key_generation_state_t;
1517df18c15SMatthias Ringwald 
1527df18c15SMatthias Ringwald typedef enum {
153901c000fSMatthias Ringwald     SM_STATE_VAR_DHKEY_COMMAND_RECEIVED = 1 << 0
154901c000fSMatthias Ringwald } sm_state_var_t;
155901c000fSMatthias Ringwald 
1563deb3ec6SMatthias Ringwald //
1573deb3ec6SMatthias Ringwald // GLOBAL DATA
1583deb3ec6SMatthias Ringwald //
1593deb3ec6SMatthias Ringwald 
1603deb3ec6SMatthias Ringwald static uint8_t test_use_fixed_local_csrk;
1613deb3ec6SMatthias Ringwald 
1623deb3ec6SMatthias Ringwald // configuration
1633deb3ec6SMatthias Ringwald static uint8_t sm_accepted_stk_generation_methods;
1643deb3ec6SMatthias Ringwald static uint8_t sm_max_encryption_key_size;
1653deb3ec6SMatthias Ringwald static uint8_t sm_min_encryption_key_size;
1663deb3ec6SMatthias Ringwald static uint8_t sm_auth_req = 0;
1673deb3ec6SMatthias Ringwald static uint8_t sm_io_capabilities = IO_CAPABILITY_NO_INPUT_NO_OUTPUT;
1683deb3ec6SMatthias Ringwald static uint8_t sm_slave_request_security;
16931c09488SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
170df86eb96SMatthias Ringwald static uint8_t sm_have_ec_keypair;
17131c09488SMatthias Ringwald #endif
1723deb3ec6SMatthias Ringwald 
1733deb3ec6SMatthias Ringwald // Security Manager Master Keys, please use sm_set_er(er) and sm_set_ir(ir) with your own 128 bit random values
1743deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_er;
1753deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_ir;
1763deb3ec6SMatthias Ringwald 
1773deb3ec6SMatthias Ringwald // derived from sm_persistent_ir
1783deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_dhk;
1793deb3ec6SMatthias Ringwald static sm_key_t sm_persistent_irk;
1803deb3ec6SMatthias Ringwald static uint8_t  sm_persistent_irk_ready = 0;    // used for testing
1813deb3ec6SMatthias Ringwald static derived_key_generation_t dkg_state;
1823deb3ec6SMatthias Ringwald 
1833deb3ec6SMatthias Ringwald // derived from sm_persistent_er
1843deb3ec6SMatthias Ringwald // ..
1853deb3ec6SMatthias Ringwald 
1863deb3ec6SMatthias Ringwald // random address update
1873deb3ec6SMatthias Ringwald static random_address_update_t rau_state;
1883deb3ec6SMatthias Ringwald static bd_addr_t sm_random_address;
1893deb3ec6SMatthias Ringwald 
190514d35fcSMatthias Ringwald // CMAC Calculation: General
1917a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
1923deb3ec6SMatthias Ringwald static cmac_state_t sm_cmac_state;
1933deb3ec6SMatthias Ringwald static uint16_t     sm_cmac_message_len;
194514d35fcSMatthias Ringwald static sm_key_t     sm_cmac_k;
1953deb3ec6SMatthias Ringwald static sm_key_t     sm_cmac_x;
196514d35fcSMatthias Ringwald static sm_key_t     sm_cmac_m_last;
1973deb3ec6SMatthias Ringwald static uint8_t      sm_cmac_block_current;
1983deb3ec6SMatthias Ringwald static uint8_t      sm_cmac_block_count;
199514d35fcSMatthias Ringwald static uint8_t      (*sm_cmac_get_byte)(uint16_t offset);
200514d35fcSMatthias Ringwald static void         (*sm_cmac_done_handler)(uint8_t * hash);
2017a766ebfSMatthias Ringwald #endif
202514d35fcSMatthias Ringwald 
203514d35fcSMatthias Ringwald // CMAC for ATT Signed Writes
2047a766ebfSMatthias Ringwald #ifdef ENABLE_LE_SIGNED_WRITE
205514d35fcSMatthias Ringwald static uint8_t      sm_cmac_header[3];
206aec94140SMatthias Ringwald static const uint8_t * sm_cmac_message;
207514d35fcSMatthias Ringwald static uint8_t      sm_cmac_sign_counter[4];
2087a766ebfSMatthias Ringwald #endif
209514d35fcSMatthias Ringwald 
210514d35fcSMatthias Ringwald // CMAC for Secure Connection functions
211514d35fcSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
212aec94140SMatthias Ringwald static sm_connection_t * sm_cmac_connection;
213514d35fcSMatthias Ringwald static uint8_t           sm_cmac_sc_buffer[80];
214514d35fcSMatthias Ringwald #endif
2153deb3ec6SMatthias Ringwald 
2163deb3ec6SMatthias Ringwald // resolvable private address lookup / CSRK calculation
2173deb3ec6SMatthias Ringwald static int       sm_address_resolution_test;
2183deb3ec6SMatthias Ringwald static int       sm_address_resolution_ah_calculation_active;
2193deb3ec6SMatthias Ringwald static uint8_t   sm_address_resolution_addr_type;
2203deb3ec6SMatthias Ringwald static bd_addr_t sm_address_resolution_address;
2213deb3ec6SMatthias Ringwald static void *    sm_address_resolution_context;
2223deb3ec6SMatthias Ringwald static address_resolution_mode_t sm_address_resolution_mode;
2238f2a52f4SMatthias Ringwald static btstack_linked_list_t sm_address_resolution_general_queue;
2243deb3ec6SMatthias Ringwald 
2253deb3ec6SMatthias Ringwald // aes128 crypto engine. store current sm_connection_t in sm_aes128_context
2263deb3ec6SMatthias Ringwald static sm_aes128_state_t  sm_aes128_state;
2273deb3ec6SMatthias Ringwald static void *             sm_aes128_context;
2283deb3ec6SMatthias Ringwald 
2293deb3ec6SMatthias Ringwald // random engine. store context (ususally sm_connection_t)
2303deb3ec6SMatthias Ringwald static void * sm_random_context;
2313deb3ec6SMatthias Ringwald 
232e03e489aSMatthias Ringwald // to receive hci events
233e03e489aSMatthias Ringwald static btstack_packet_callback_registration_t hci_event_callback_registration;
234e03e489aSMatthias Ringwald 
23589a78d34SMatthias Ringwald /* to dispatch sm event */
23689a78d34SMatthias Ringwald static btstack_linked_list_t sm_event_handlers;
23789a78d34SMatthias Ringwald 
23809e4d397SMatthias Ringwald // LE Secure Connections
23909e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
24009e4d397SMatthias Ringwald static ec_key_generation_state_t ec_key_generation_state;
24109e4d397SMatthias Ringwald static uint8_t ec_d[32];
24209e4d397SMatthias Ringwald static uint8_t ec_qx[32];
24309e4d397SMatthias Ringwald static uint8_t ec_qy[32];
24409e4d397SMatthias Ringwald #endif
245df86eb96SMatthias Ringwald 
24627c32905SMatthias Ringwald // Software ECDH implementation provided by mbedtls
24727c32905SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
248e722521aSMatthias Ringwald // group is always valid
249e722521aSMatthias Ringwald static mbedtls_ecp_group   mbedtls_ec_group;
25068437d83SMatthias Ringwald #ifndef HAVE_MALLOC
251ae4aa2b6SMatthias Ringwald // COMP Method with Window 2
252ae4aa2b6SMatthias Ringwald // 1300 bytes with 23 allocations
253ae4aa2b6SMatthias Ringwald // #define MBEDTLS_ALLOC_BUFFER_SIZE (1300+23*sizeof(void *))
254ae4aa2b6SMatthias Ringwald // NAIVE Method with safe cond assignments (without safe cond, order changes and allocations fail)
255ae4aa2b6SMatthias Ringwald #define MBEDTLS_ALLOC_BUFFER_SIZE (700+18*sizeof(void *))
256df86eb96SMatthias Ringwald static uint8_t mbedtls_memory_buffer[MBEDTLS_ALLOC_BUFFER_SIZE];
257d3bd9600SMatthias Ringwald #endif
25827c32905SMatthias Ringwald #endif
25927c32905SMatthias Ringwald 
2603deb3ec6SMatthias Ringwald //
2613deb3ec6SMatthias Ringwald // Volume 3, Part H, Chapter 24
2623deb3ec6SMatthias Ringwald // "Security shall be initiated by the Security Manager in the device in the master role.
2633deb3ec6SMatthias Ringwald // The device in the slave role shall be the responding device."
2643deb3ec6SMatthias Ringwald // -> master := initiator, slave := responder
2653deb3ec6SMatthias Ringwald //
2663deb3ec6SMatthias Ringwald 
2673deb3ec6SMatthias Ringwald // data needed for security setup
2683deb3ec6SMatthias Ringwald typedef struct sm_setup_context {
2693deb3ec6SMatthias Ringwald 
270ec820d77SMatthias Ringwald     btstack_timer_source_t sm_timeout;
2713deb3ec6SMatthias Ringwald 
2723deb3ec6SMatthias Ringwald     // used in all phases
2733deb3ec6SMatthias Ringwald     uint8_t   sm_pairing_failed_reason;
2743deb3ec6SMatthias Ringwald 
2753deb3ec6SMatthias Ringwald     // user response, (Phase 1 and/or 2)
2763deb3ec6SMatthias Ringwald     uint8_t   sm_user_response;
2773d7fe1e9SMatthias Ringwald     uint8_t   sm_keypress_notification;
2783deb3ec6SMatthias Ringwald 
2793deb3ec6SMatthias Ringwald     // defines which keys will be send after connection is encrypted - calculated during Phase 1, used Phase 3
2803deb3ec6SMatthias Ringwald     int       sm_key_distribution_send_set;
2813deb3ec6SMatthias Ringwald     int       sm_key_distribution_received_set;
2823deb3ec6SMatthias Ringwald 
2833deb3ec6SMatthias Ringwald     // Phase 2 (Pairing over SMP)
2843deb3ec6SMatthias Ringwald     stk_generation_method_t sm_stk_generation_method;
2853deb3ec6SMatthias Ringwald     sm_key_t  sm_tk;
28627c32905SMatthias Ringwald     uint8_t   sm_use_secure_connections;
2873deb3ec6SMatthias Ringwald 
2883deb3ec6SMatthias Ringwald     sm_key_t  sm_c1_t3_value;   // c1 calculation
2893deb3ec6SMatthias Ringwald     sm_pairing_packet_t sm_m_preq; // pairing request - needed only for c1
2903deb3ec6SMatthias Ringwald     sm_pairing_packet_t sm_s_pres; // pairing response - needed only for c1
2913deb3ec6SMatthias Ringwald     sm_key_t  sm_local_random;
2923deb3ec6SMatthias Ringwald     sm_key_t  sm_local_confirm;
2933deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_random;
2943deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_confirm;
2953deb3ec6SMatthias Ringwald     uint8_t   sm_m_addr_type;   // address and type can be removed
2963deb3ec6SMatthias Ringwald     uint8_t   sm_s_addr_type;   //  ''
2973deb3ec6SMatthias Ringwald     bd_addr_t sm_m_address;     //  ''
2983deb3ec6SMatthias Ringwald     bd_addr_t sm_s_address;     //  ''
2993deb3ec6SMatthias Ringwald     sm_key_t  sm_ltk;
3003deb3ec6SMatthias Ringwald 
30168437d83SMatthias Ringwald     uint8_t   sm_state_vars;
302e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3037df18c15SMatthias Ringwald     uint8_t   sm_peer_qx[32];   // also stores random for EC key generation during init
3047df18c15SMatthias Ringwald     uint8_t   sm_peer_qy[32];   //  ''
305446a8c36SMatthias Ringwald     sm_key_t  sm_peer_nonce;    // might be combined with sm_peer_random
306446a8c36SMatthias Ringwald     sm_key_t  sm_local_nonce;   // might be combined with sm_local_random
307e53be891SMatthias Ringwald     sm_key_t  sm_peer_dhkey_check;
308e53be891SMatthias Ringwald     sm_key_t  sm_local_dhkey_check;
309446a8c36SMatthias Ringwald     sm_key_t  sm_ra;
310446a8c36SMatthias Ringwald     sm_key_t  sm_rb;
3112bacf595SMatthias Ringwald     sm_key_t  sm_t;             // used for f5 and h6
312a9f29768SMatthias Ringwald     sm_key_t  sm_mackey;
3137df18c15SMatthias Ringwald     uint8_t   sm_passkey_bit;   // also stores number of generated random bytes for EC key generation
314e53be891SMatthias Ringwald #endif
31527c32905SMatthias Ringwald 
3163deb3ec6SMatthias Ringwald     // Phase 3
3173deb3ec6SMatthias Ringwald 
3183deb3ec6SMatthias Ringwald     // key distribution, we generate
3193deb3ec6SMatthias Ringwald     uint16_t  sm_local_y;
3203deb3ec6SMatthias Ringwald     uint16_t  sm_local_div;
3213deb3ec6SMatthias Ringwald     uint16_t  sm_local_ediv;
3223deb3ec6SMatthias Ringwald     uint8_t   sm_local_rand[8];
3233deb3ec6SMatthias Ringwald     sm_key_t  sm_local_ltk;
3243deb3ec6SMatthias Ringwald     sm_key_t  sm_local_csrk;
3253deb3ec6SMatthias Ringwald     sm_key_t  sm_local_irk;
3263deb3ec6SMatthias Ringwald     // sm_local_address/addr_type not needed
3273deb3ec6SMatthias Ringwald 
3283deb3ec6SMatthias Ringwald     // key distribution, received from peer
3293deb3ec6SMatthias Ringwald     uint16_t  sm_peer_y;
3303deb3ec6SMatthias Ringwald     uint16_t  sm_peer_div;
3313deb3ec6SMatthias Ringwald     uint16_t  sm_peer_ediv;
3323deb3ec6SMatthias Ringwald     uint8_t   sm_peer_rand[8];
3333deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_ltk;
3343deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_irk;
3353deb3ec6SMatthias Ringwald     sm_key_t  sm_peer_csrk;
3363deb3ec6SMatthias Ringwald     uint8_t   sm_peer_addr_type;
3373deb3ec6SMatthias Ringwald     bd_addr_t sm_peer_address;
3383deb3ec6SMatthias Ringwald 
3393deb3ec6SMatthias Ringwald } sm_setup_context_t;
3403deb3ec6SMatthias Ringwald 
3413deb3ec6SMatthias Ringwald //
3423deb3ec6SMatthias Ringwald static sm_setup_context_t the_setup;
3433deb3ec6SMatthias Ringwald static sm_setup_context_t * setup = &the_setup;
3443deb3ec6SMatthias Ringwald 
3453deb3ec6SMatthias Ringwald // active connection - the one for which the_setup is used for
3463deb3ec6SMatthias Ringwald static uint16_t sm_active_connection = 0;
3473deb3ec6SMatthias Ringwald 
3483deb3ec6SMatthias Ringwald // @returns 1 if oob data is available
3493deb3ec6SMatthias Ringwald // stores oob data in provided 16 byte buffer if not null
3503deb3ec6SMatthias Ringwald static int (*sm_get_oob_data)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data) = NULL;
3513deb3ec6SMatthias Ringwald 
3523deb3ec6SMatthias Ringwald // horizontal: initiator capabilities
3533deb3ec6SMatthias Ringwald // vertial:    responder capabilities
3543deb3ec6SMatthias Ringwald static const stk_generation_method_t stk_generation_method [5] [5] = {
3553deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
3563deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
3573deb3ec6SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    OK_BOTH_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
3583deb3ec6SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       JUST_WORKS,      JUST_WORKS,    JUST_WORKS    },
3593deb3ec6SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
3603deb3ec6SMatthias Ringwald };
3613deb3ec6SMatthias Ringwald 
36227c32905SMatthias Ringwald // uses numeric comparison if one side has DisplayYesNo and KeyboardDisplay combinations
36327c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
36427c32905SMatthias Ringwald static const stk_generation_method_t stk_generation_method_with_secure_connection[5][5] = {
36527c32905SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       PK_INIT_INPUT,   JUST_WORKS,    PK_INIT_INPUT },
36627c32905SMatthias Ringwald     { JUST_WORKS,      NK_BOTH_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    NK_BOTH_INPUT },
36727c32905SMatthias Ringwald     { PK_RESP_INPUT,   PK_RESP_INPUT,    OK_BOTH_INPUT,   JUST_WORKS,    PK_RESP_INPUT },
36827c32905SMatthias Ringwald     { JUST_WORKS,      JUST_WORKS,       JUST_WORKS,      JUST_WORKS,    JUST_WORKS    },
36927c32905SMatthias Ringwald     { PK_RESP_INPUT,   NK_BOTH_INPUT,    PK_INIT_INPUT,   JUST_WORKS,    NK_BOTH_INPUT },
37027c32905SMatthias Ringwald };
37127c32905SMatthias Ringwald #endif
37227c32905SMatthias Ringwald 
3733deb3ec6SMatthias Ringwald static void sm_run(void);
374711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle);
375711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle);
3763deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other);
3773deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void);
3783deb3ec6SMatthias Ringwald 
3793deb3ec6SMatthias Ringwald static void log_info_hex16(const char * name, uint16_t value){
3803deb3ec6SMatthias Ringwald     log_info("%-6s 0x%04x", name, value);
3813deb3ec6SMatthias Ringwald }
3823deb3ec6SMatthias Ringwald 
3833deb3ec6SMatthias Ringwald // @returns 1 if all bytes are 0
3843764b551SMatthias Ringwald static int sm_is_null(uint8_t * data, int size){
3853deb3ec6SMatthias Ringwald     int i;
3863764b551SMatthias Ringwald     for (i=0; i < size ; i++){
3873764b551SMatthias Ringwald         if (data[i]) return 0;
3883deb3ec6SMatthias Ringwald     }
3893deb3ec6SMatthias Ringwald     return 1;
3903deb3ec6SMatthias Ringwald }
3913deb3ec6SMatthias Ringwald 
3923764b551SMatthias Ringwald static int sm_is_null_random(uint8_t random[8]){
3933764b551SMatthias Ringwald     return sm_is_null(random, 8);
3943764b551SMatthias Ringwald }
3953764b551SMatthias Ringwald 
3963764b551SMatthias Ringwald static int sm_is_null_key(uint8_t * key){
3973764b551SMatthias Ringwald     return sm_is_null(key, 16);
3983764b551SMatthias Ringwald }
3993764b551SMatthias Ringwald 
4003deb3ec6SMatthias Ringwald // Key utils
4013deb3ec6SMatthias Ringwald static void sm_reset_tk(void){
4023deb3ec6SMatthias Ringwald     int i;
4033deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
4043deb3ec6SMatthias Ringwald         setup->sm_tk[i] = 0;
4053deb3ec6SMatthias Ringwald     }
4063deb3ec6SMatthias Ringwald }
4073deb3ec6SMatthias Ringwald 
4083deb3ec6SMatthias Ringwald // "For example, if a 128-bit encryption key is 0x123456789ABCDEF0123456789ABCDEF0
4093deb3ec6SMatthias Ringwald // and it is reduced to 7 octets (56 bits), then the resulting key is 0x0000000000000000003456789ABCDEF0.""
4103deb3ec6SMatthias Ringwald static void sm_truncate_key(sm_key_t key, int max_encryption_size){
4113deb3ec6SMatthias Ringwald     int i;
4123deb3ec6SMatthias Ringwald     for (i = max_encryption_size ; i < 16 ; i++){
4133deb3ec6SMatthias Ringwald         key[15-i] = 0;
4143deb3ec6SMatthias Ringwald     }
4153deb3ec6SMatthias Ringwald }
4163deb3ec6SMatthias Ringwald 
4173deb3ec6SMatthias Ringwald // SMP Timeout implementation
4183deb3ec6SMatthias Ringwald 
4193deb3ec6SMatthias Ringwald // Upon transmission of the Pairing Request command or reception of the Pairing Request command,
4203deb3ec6SMatthias Ringwald // the Security Manager Timer shall be reset and started.
4213deb3ec6SMatthias Ringwald //
4223deb3ec6SMatthias Ringwald // The Security Manager Timer shall be reset when an L2CAP SMP command is queued for transmission.
4233deb3ec6SMatthias Ringwald //
4243deb3ec6SMatthias Ringwald // If the Security Manager Timer reaches 30 seconds, the procedure shall be considered to have failed,
4253deb3ec6SMatthias Ringwald // and the local higher layer shall be notified. No further SMP commands shall be sent over the L2CAP
4263deb3ec6SMatthias Ringwald // Security Manager Channel. A new SM procedure shall only be performed when a new physical link has been
4273deb3ec6SMatthias Ringwald // established.
4283deb3ec6SMatthias Ringwald 
429ec820d77SMatthias Ringwald static void sm_timeout_handler(btstack_timer_source_t * timer){
4303deb3ec6SMatthias Ringwald     log_info("SM timeout");
431c5b64319SMatthias Ringwald     sm_connection_t * sm_conn = (sm_connection_t*) btstack_run_loop_get_timer_context(timer);
4323deb3ec6SMatthias Ringwald     sm_conn->sm_engine_state = SM_GENERAL_TIMEOUT;
4333deb3ec6SMatthias Ringwald     sm_done_for_handle(sm_conn->sm_handle);
4343deb3ec6SMatthias Ringwald 
4353deb3ec6SMatthias Ringwald     // trigger handling of next ready connection
4363deb3ec6SMatthias Ringwald     sm_run();
4373deb3ec6SMatthias Ringwald }
4383deb3ec6SMatthias Ringwald static void sm_timeout_start(sm_connection_t * sm_conn){
439528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&setup->sm_timeout);
44091a977e8SMatthias Ringwald     btstack_run_loop_set_timer_context(&setup->sm_timeout, sm_conn);
441528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer_handler(&setup->sm_timeout, sm_timeout_handler);
442528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&setup->sm_timeout, 30000); // 30 seconds sm timeout
443528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&setup->sm_timeout);
4443deb3ec6SMatthias Ringwald }
4453deb3ec6SMatthias Ringwald static void sm_timeout_stop(void){
446528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&setup->sm_timeout);
4473deb3ec6SMatthias Ringwald }
4483deb3ec6SMatthias Ringwald static void sm_timeout_reset(sm_connection_t * sm_conn){
4493deb3ec6SMatthias Ringwald     sm_timeout_stop();
4503deb3ec6SMatthias Ringwald     sm_timeout_start(sm_conn);
4513deb3ec6SMatthias Ringwald }
4523deb3ec6SMatthias Ringwald 
4533deb3ec6SMatthias Ringwald // end of sm timeout
4543deb3ec6SMatthias Ringwald 
4553deb3ec6SMatthias Ringwald // GAP Random Address updates
4563deb3ec6SMatthias Ringwald static gap_random_address_type_t gap_random_adress_type;
457ec820d77SMatthias Ringwald static btstack_timer_source_t gap_random_address_update_timer;
4583deb3ec6SMatthias Ringwald static uint32_t gap_random_adress_update_period;
4593deb3ec6SMatthias Ringwald 
4603deb3ec6SMatthias Ringwald static void gap_random_address_trigger(void){
4613deb3ec6SMatthias Ringwald     if (rau_state != RAU_IDLE) return;
4623deb3ec6SMatthias Ringwald     log_info("gap_random_address_trigger");
4633deb3ec6SMatthias Ringwald     rau_state = RAU_GET_RANDOM;
4643deb3ec6SMatthias Ringwald     sm_run();
4653deb3ec6SMatthias Ringwald }
4663deb3ec6SMatthias Ringwald 
467ec820d77SMatthias Ringwald static void gap_random_address_update_handler(btstack_timer_source_t * timer){
4689ec2630cSMatthias Ringwald     UNUSED(timer);
4699ec2630cSMatthias Ringwald 
4703deb3ec6SMatthias Ringwald     log_info("GAP Random Address Update due");
471528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period);
472528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&gap_random_address_update_timer);
4733deb3ec6SMatthias Ringwald     gap_random_address_trigger();
4743deb3ec6SMatthias Ringwald }
4753deb3ec6SMatthias Ringwald 
4763deb3ec6SMatthias Ringwald static void gap_random_address_update_start(void){
477528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer_handler(&gap_random_address_update_timer, gap_random_address_update_handler);
478528a4a3bSMatthias Ringwald     btstack_run_loop_set_timer(&gap_random_address_update_timer, gap_random_adress_update_period);
479528a4a3bSMatthias Ringwald     btstack_run_loop_add_timer(&gap_random_address_update_timer);
4803deb3ec6SMatthias Ringwald }
4813deb3ec6SMatthias Ringwald 
4823deb3ec6SMatthias Ringwald static void gap_random_address_update_stop(void){
483528a4a3bSMatthias Ringwald     btstack_run_loop_remove_timer(&gap_random_address_update_timer);
4843deb3ec6SMatthias Ringwald }
4853deb3ec6SMatthias Ringwald 
4863deb3ec6SMatthias Ringwald 
4873deb3ec6SMatthias Ringwald static void sm_random_start(void * context){
4883deb3ec6SMatthias Ringwald     sm_random_context = context;
4893deb3ec6SMatthias Ringwald     hci_send_cmd(&hci_le_rand);
4903deb3ec6SMatthias Ringwald }
4913deb3ec6SMatthias Ringwald 
4923deb3ec6SMatthias Ringwald // pre: sm_aes128_state != SM_AES128_ACTIVE, hci_can_send_command == 1
4933deb3ec6SMatthias Ringwald // context is made availabe to aes128 result handler by this
4943deb3ec6SMatthias Ringwald static void sm_aes128_start(sm_key_t key, sm_key_t plaintext, void * context){
4953deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_ACTIVE;
4963deb3ec6SMatthias Ringwald     sm_key_t key_flipped, plaintext_flipped;
4979c80e4ccSMatthias Ringwald     reverse_128(key, key_flipped);
4989c80e4ccSMatthias Ringwald     reverse_128(plaintext, plaintext_flipped);
4993deb3ec6SMatthias Ringwald     sm_aes128_context = context;
5003deb3ec6SMatthias Ringwald     hci_send_cmd(&hci_le_encrypt, key_flipped, plaintext_flipped);
5013deb3ec6SMatthias Ringwald }
5023deb3ec6SMatthias Ringwald 
5033deb3ec6SMatthias Ringwald // ah(k,r) helper
5043deb3ec6SMatthias Ringwald // r = padding || r
5053deb3ec6SMatthias Ringwald // r - 24 bit value
5064a6806f3SMatthias Ringwald static void sm_ah_r_prime(uint8_t r[3], uint8_t * r_prime){
5073deb3ec6SMatthias Ringwald     // r'= padding || r
5083deb3ec6SMatthias Ringwald     memset(r_prime, 0, 16);
5093deb3ec6SMatthias Ringwald     memcpy(&r_prime[13], r, 3);
5103deb3ec6SMatthias Ringwald }
5113deb3ec6SMatthias Ringwald 
5123deb3ec6SMatthias Ringwald // d1 helper
5133deb3ec6SMatthias Ringwald // d' = padding || r || d
5143deb3ec6SMatthias Ringwald // d,r - 16 bit values
5154a6806f3SMatthias Ringwald static void sm_d1_d_prime(uint16_t d, uint16_t r, uint8_t * d1_prime){
5163deb3ec6SMatthias Ringwald     // d'= padding || r || d
5173deb3ec6SMatthias Ringwald     memset(d1_prime, 0, 16);
518f8fbdce0SMatthias Ringwald     big_endian_store_16(d1_prime, 12, r);
519f8fbdce0SMatthias Ringwald     big_endian_store_16(d1_prime, 14, d);
5203deb3ec6SMatthias Ringwald }
5213deb3ec6SMatthias Ringwald 
5223deb3ec6SMatthias Ringwald // dm helper
5233deb3ec6SMatthias Ringwald // r’ = padding || r
5243deb3ec6SMatthias Ringwald // r - 64 bit value
5254a6806f3SMatthias Ringwald static void sm_dm_r_prime(uint8_t r[8], uint8_t * r_prime){
5263deb3ec6SMatthias Ringwald     memset(r_prime, 0, 16);
5273deb3ec6SMatthias Ringwald     memcpy(&r_prime[8], r, 8);
5283deb3ec6SMatthias Ringwald }
5293deb3ec6SMatthias Ringwald 
5303deb3ec6SMatthias Ringwald // calculate arguments for first AES128 operation in C1 function
5314a6806f3SMatthias Ringwald static void sm_c1_t1(sm_key_t r, uint8_t preq[7], uint8_t pres[7], uint8_t iat, uint8_t rat, uint8_t * t1){
5323deb3ec6SMatthias Ringwald 
5333deb3ec6SMatthias Ringwald     // p1 = pres || preq || rat’ || iat’
5343deb3ec6SMatthias Ringwald     // "The octet of iat’ becomes the least significant octet of p1 and the most signifi-
5353deb3ec6SMatthias Ringwald     // cant octet of pres becomes the most significant octet of p1.
5363deb3ec6SMatthias Ringwald     // For example, if the 8-bit iat’ is 0x01, the 8-bit rat’ is 0x00, the 56-bit preq
5373deb3ec6SMatthias Ringwald     // is 0x07071000000101 and the 56 bit pres is 0x05000800000302 then
5383deb3ec6SMatthias Ringwald     // p1 is 0x05000800000302070710000001010001."
5393deb3ec6SMatthias Ringwald 
5403deb3ec6SMatthias Ringwald     sm_key_t p1;
5419c80e4ccSMatthias Ringwald     reverse_56(pres, &p1[0]);
5429c80e4ccSMatthias Ringwald     reverse_56(preq, &p1[7]);
5433deb3ec6SMatthias Ringwald     p1[14] = rat;
5443deb3ec6SMatthias Ringwald     p1[15] = iat;
5458314c363SMatthias Ringwald     log_info_key("p1", p1);
5468314c363SMatthias Ringwald     log_info_key("r", r);
5473deb3ec6SMatthias Ringwald 
5483deb3ec6SMatthias Ringwald     // t1 = r xor p1
5493deb3ec6SMatthias Ringwald     int i;
5503deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
5513deb3ec6SMatthias Ringwald         t1[i] = r[i] ^ p1[i];
5523deb3ec6SMatthias Ringwald     }
5538314c363SMatthias Ringwald     log_info_key("t1", t1);
5543deb3ec6SMatthias Ringwald }
5553deb3ec6SMatthias Ringwald 
5563deb3ec6SMatthias Ringwald // calculate arguments for second AES128 operation in C1 function
5574a6806f3SMatthias Ringwald static void sm_c1_t3(sm_key_t t2, bd_addr_t ia, bd_addr_t ra, uint8_t * t3){
5583deb3ec6SMatthias Ringwald      // p2 = padding || ia || ra
5593deb3ec6SMatthias Ringwald     // "The least significant octet of ra becomes the least significant octet of p2 and
5603deb3ec6SMatthias Ringwald     // the most significant octet of padding becomes the most significant octet of p2.
5613deb3ec6SMatthias Ringwald     // For example, if 48-bit ia is 0xA1A2A3A4A5A6 and the 48-bit ra is
5623deb3ec6SMatthias Ringwald     // 0xB1B2B3B4B5B6 then p2 is 0x00000000A1A2A3A4A5A6B1B2B3B4B5B6.
5633deb3ec6SMatthias Ringwald 
5643deb3ec6SMatthias Ringwald     sm_key_t p2;
5653deb3ec6SMatthias Ringwald     memset(p2, 0, 16);
5663deb3ec6SMatthias Ringwald     memcpy(&p2[4],  ia, 6);
5673deb3ec6SMatthias Ringwald     memcpy(&p2[10], ra, 6);
5688314c363SMatthias Ringwald     log_info_key("p2", p2);
5693deb3ec6SMatthias Ringwald 
5703deb3ec6SMatthias Ringwald     // c1 = e(k, t2_xor_p2)
5713deb3ec6SMatthias Ringwald     int i;
5723deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
5733deb3ec6SMatthias Ringwald         t3[i] = t2[i] ^ p2[i];
5743deb3ec6SMatthias Ringwald     }
5758314c363SMatthias Ringwald     log_info_key("t3", t3);
5763deb3ec6SMatthias Ringwald }
5773deb3ec6SMatthias Ringwald 
5784a6806f3SMatthias Ringwald static void sm_s1_r_prime(sm_key_t r1, sm_key_t r2, uint8_t * r_prime){
5798314c363SMatthias Ringwald     log_info_key("r1", r1);
5808314c363SMatthias Ringwald     log_info_key("r2", r2);
5813deb3ec6SMatthias Ringwald     memcpy(&r_prime[8], &r2[8], 8);
5823deb3ec6SMatthias Ringwald     memcpy(&r_prime[0], &r1[8], 8);
5833deb3ec6SMatthias Ringwald }
5843deb3ec6SMatthias Ringwald 
585e53be891SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
586e53be891SMatthias Ringwald // Software implementations of crypto toolbox for LE Secure Connection
587e53be891SMatthias Ringwald // TODO: replace with code to use AES Engine of HCI Controller
588e53be891SMatthias Ringwald typedef uint8_t sm_key24_t[3];
589e53be891SMatthias Ringwald typedef uint8_t sm_key56_t[7];
590e53be891SMatthias Ringwald typedef uint8_t sm_key256_t[32];
591e53be891SMatthias Ringwald 
592bd57ffebSMatthias Ringwald #if 0
593e53be891SMatthias Ringwald static void aes128_calc_cyphertext(const uint8_t key[16], const uint8_t plaintext[16], uint8_t cyphertext[16]){
594e53be891SMatthias Ringwald     uint32_t rk[RKLENGTH(KEYBITS)];
595e53be891SMatthias Ringwald     int nrounds = rijndaelSetupEncrypt(rk, &key[0], KEYBITS);
596e53be891SMatthias Ringwald     rijndaelEncrypt(rk, nrounds, plaintext, cyphertext);
597e53be891SMatthias Ringwald }
598e53be891SMatthias Ringwald 
599e53be891SMatthias Ringwald static void calc_subkeys(sm_key_t k0, sm_key_t k1, sm_key_t k2){
600e53be891SMatthias Ringwald     memcpy(k1, k0, 16);
601e53be891SMatthias Ringwald     sm_shift_left_by_one_bit_inplace(16, k1);
602e53be891SMatthias Ringwald     if (k0[0] & 0x80){
603e53be891SMatthias Ringwald         k1[15] ^= 0x87;
604e53be891SMatthias Ringwald     }
605e53be891SMatthias Ringwald     memcpy(k2, k1, 16);
606e53be891SMatthias Ringwald     sm_shift_left_by_one_bit_inplace(16, k2);
607e53be891SMatthias Ringwald     if (k1[0] & 0x80){
608e53be891SMatthias Ringwald         k2[15] ^= 0x87;
609e53be891SMatthias Ringwald     }
610e53be891SMatthias Ringwald }
611e53be891SMatthias Ringwald 
612e53be891SMatthias Ringwald static void aes_cmac(sm_key_t aes_cmac, const sm_key_t key, const uint8_t * data, int cmac_message_len){
613e53be891SMatthias Ringwald     sm_key_t k0, k1, k2, zero;
614e53be891SMatthias Ringwald     memset(zero, 0, 16);
615e53be891SMatthias Ringwald 
616e53be891SMatthias Ringwald     aes128_calc_cyphertext(key, zero, k0);
617e53be891SMatthias Ringwald     calc_subkeys(k0, k1, k2);
618e53be891SMatthias Ringwald 
619e53be891SMatthias Ringwald     int cmac_block_count = (cmac_message_len + 15) / 16;
620e53be891SMatthias Ringwald 
621e53be891SMatthias Ringwald     // step 3: ..
622e53be891SMatthias Ringwald     if (cmac_block_count==0){
623e53be891SMatthias Ringwald         cmac_block_count = 1;
624e53be891SMatthias Ringwald     }
625e53be891SMatthias Ringwald 
626e53be891SMatthias Ringwald     // step 4: set m_last
627e53be891SMatthias Ringwald     sm_key_t cmac_m_last;
628e53be891SMatthias Ringwald     int sm_cmac_last_block_complete = cmac_message_len != 0 && (cmac_message_len & 0x0f) == 0;
629e53be891SMatthias Ringwald     int i;
630e53be891SMatthias Ringwald     if (sm_cmac_last_block_complete){
631e53be891SMatthias Ringwald         for (i=0;i<16;i++){
632e53be891SMatthias Ringwald             cmac_m_last[i] = data[cmac_message_len - 16 + i] ^ k1[i];
633e53be891SMatthias Ringwald         }
634e53be891SMatthias Ringwald     } else {
635e53be891SMatthias Ringwald         int valid_octets_in_last_block = cmac_message_len & 0x0f;
636e53be891SMatthias Ringwald         for (i=0;i<16;i++){
637e53be891SMatthias Ringwald             if (i < valid_octets_in_last_block){
638e53be891SMatthias Ringwald                 cmac_m_last[i] = data[(cmac_message_len & 0xfff0) + i] ^ k2[i];
639e53be891SMatthias Ringwald                 continue;
640e53be891SMatthias Ringwald             }
641e53be891SMatthias Ringwald             if (i == valid_octets_in_last_block){
642e53be891SMatthias Ringwald                 cmac_m_last[i] = 0x80 ^ k2[i];
643e53be891SMatthias Ringwald                 continue;
644e53be891SMatthias Ringwald             }
645e53be891SMatthias Ringwald             cmac_m_last[i] = k2[i];
646e53be891SMatthias Ringwald         }
647e53be891SMatthias Ringwald     }
648e53be891SMatthias Ringwald 
649e53be891SMatthias Ringwald     // printf("sm_cmac_start: len %u, block count %u\n", cmac_message_len, cmac_block_count);
650e53be891SMatthias Ringwald     // LOG_KEY(cmac_m_last);
651e53be891SMatthias Ringwald 
652e53be891SMatthias Ringwald     // Step 5
653e53be891SMatthias Ringwald     sm_key_t cmac_x;
654e53be891SMatthias Ringwald     memset(cmac_x, 0, 16);
655e53be891SMatthias Ringwald 
656e53be891SMatthias Ringwald     // Step 6
657e53be891SMatthias Ringwald     sm_key_t sm_cmac_y;
658e53be891SMatthias Ringwald     for (int block = 0 ; block < cmac_block_count-1 ; block++){
659e53be891SMatthias Ringwald         for (i=0;i<16;i++){
660e53be891SMatthias Ringwald             sm_cmac_y[i] = cmac_x[i] ^ data[block * 16 + i];
661e53be891SMatthias Ringwald         }
662e53be891SMatthias Ringwald         aes128_calc_cyphertext(key, sm_cmac_y, cmac_x);
663e53be891SMatthias Ringwald     }
664e53be891SMatthias Ringwald     for (i=0;i<16;i++){
665e53be891SMatthias Ringwald         sm_cmac_y[i] = cmac_x[i] ^ cmac_m_last[i];
666e53be891SMatthias Ringwald     }
667e53be891SMatthias Ringwald 
668e53be891SMatthias Ringwald     // Step 7
669e53be891SMatthias Ringwald     aes128_calc_cyphertext(key, sm_cmac_y, aes_cmac);
670e53be891SMatthias Ringwald }
671bd57ffebSMatthias Ringwald #endif
672e53be891SMatthias Ringwald #endif
673e53be891SMatthias Ringwald 
674711e6c80SMatthias 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){
6753deb3ec6SMatthias Ringwald     event[0] = type;
6763deb3ec6SMatthias Ringwald     event[1] = event_size - 2;
677711e6c80SMatthias Ringwald     little_endian_store_16(event, 2, con_handle);
6783deb3ec6SMatthias Ringwald     event[4] = addr_type;
679724d70a2SMatthias Ringwald     reverse_bd_addr(address, &event[5]);
6803deb3ec6SMatthias Ringwald }
6813deb3ec6SMatthias Ringwald 
68289a78d34SMatthias Ringwald static void sm_dispatch_event(uint8_t packet_type, uint16_t channel, uint8_t * packet, uint16_t size){
6839ec2630cSMatthias Ringwald     UNUSED(channel);
6849ec2630cSMatthias Ringwald 
68513377825SMatthias Ringwald     // log event
68613377825SMatthias Ringwald     hci_dump_packet(packet_type, 1, packet, size);
68789a78d34SMatthias Ringwald     // dispatch to all event handlers
68889a78d34SMatthias Ringwald     btstack_linked_list_iterator_t it;
68989a78d34SMatthias Ringwald     btstack_linked_list_iterator_init(&it, &sm_event_handlers);
69089a78d34SMatthias Ringwald     while (btstack_linked_list_iterator_has_next(&it)){
69189a78d34SMatthias Ringwald         btstack_packet_callback_registration_t * entry = (btstack_packet_callback_registration_t*) btstack_linked_list_iterator_next(&it);
692d9a7306aSMatthias Ringwald         entry->callback(packet_type, 0, packet, size);
69389a78d34SMatthias Ringwald     }
69489a78d34SMatthias Ringwald }
69589a78d34SMatthias Ringwald 
696711e6c80SMatthias Ringwald static void sm_notify_client_base(uint8_t type, hci_con_handle_t con_handle, uint8_t addr_type, bd_addr_t address){
6973deb3ec6SMatthias Ringwald     uint8_t event[11];
698711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
69989a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7003deb3ec6SMatthias Ringwald }
7013deb3ec6SMatthias Ringwald 
702711e6c80SMatthias 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){
7033deb3ec6SMatthias Ringwald     uint8_t event[15];
704711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
705f8fbdce0SMatthias Ringwald     little_endian_store_32(event, 11, passkey);
70689a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7073deb3ec6SMatthias Ringwald }
7083deb3ec6SMatthias Ringwald 
709711e6c80SMatthias 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){
71013377825SMatthias Ringwald     // fetch addr and addr type from db
71113377825SMatthias Ringwald     bd_addr_t identity_address;
71213377825SMatthias Ringwald     int identity_address_type;
71313377825SMatthias Ringwald     le_device_db_info(index, &identity_address_type, identity_address, NULL);
71413377825SMatthias Ringwald 
715334126b3SMatthias Ringwald     uint8_t event[19];
716711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
71713377825SMatthias Ringwald     event[11] = identity_address_type;
71813377825SMatthias Ringwald     reverse_bd_addr(identity_address, &event[12]);
719334126b3SMatthias Ringwald     event[18] = index;
72089a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, event, sizeof(event));
7213deb3ec6SMatthias Ringwald }
7223deb3ec6SMatthias Ringwald 
723711e6c80SMatthias 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){
7243deb3ec6SMatthias Ringwald 
7253deb3ec6SMatthias Ringwald     uint8_t event[18];
726711e6c80SMatthias Ringwald     sm_setup_event_base(event, sizeof(event), type, con_handle, addr_type, address);
7273deb3ec6SMatthias Ringwald     event[11] = result;
72889a78d34SMatthias Ringwald     sm_dispatch_event(HCI_EVENT_PACKET, 0, (uint8_t*) &event, sizeof(event));
7293deb3ec6SMatthias Ringwald }
7303deb3ec6SMatthias Ringwald 
7313deb3ec6SMatthias Ringwald // decide on stk generation based on
7323deb3ec6SMatthias Ringwald // - pairing request
7333deb3ec6SMatthias Ringwald // - io capabilities
7343deb3ec6SMatthias Ringwald // - OOB data availability
7353deb3ec6SMatthias Ringwald static void sm_setup_tk(void){
7363deb3ec6SMatthias Ringwald 
7373deb3ec6SMatthias Ringwald     // default: just works
7383deb3ec6SMatthias Ringwald     setup->sm_stk_generation_method = JUST_WORKS;
7393deb3ec6SMatthias Ringwald 
74027c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
74127c32905SMatthias Ringwald     setup->sm_use_secure_connections = ( sm_pairing_packet_get_auth_req(setup->sm_m_preq)
74227c32905SMatthias Ringwald                                        & sm_pairing_packet_get_auth_req(setup->sm_s_pres)
74327c32905SMatthias Ringwald                                        & SM_AUTHREQ_SECURE_CONNECTION ) != 0;
744446a8c36SMatthias Ringwald     memset(setup->sm_ra, 0, 16);
745446a8c36SMatthias Ringwald     memset(setup->sm_rb, 0, 16);
74627c32905SMatthias Ringwald #else
74727c32905SMatthias Ringwald     setup->sm_use_secure_connections = 0;
74827c32905SMatthias Ringwald #endif
74927c32905SMatthias Ringwald 
75027c32905SMatthias Ringwald     // If both devices have not set the MITM option in the Authentication Requirements
75127c32905SMatthias Ringwald     // Flags, then the IO capabilities shall be ignored and the Just Works association
75227c32905SMatthias Ringwald     // model shall be used.
75327c32905SMatthias Ringwald     if (((sm_pairing_packet_get_auth_req(setup->sm_m_preq) & SM_AUTHREQ_MITM_PROTECTION) == 0)
75427c32905SMatthias Ringwald     &&  ((sm_pairing_packet_get_auth_req(setup->sm_s_pres) & SM_AUTHREQ_MITM_PROTECTION) == 0)){
75527c32905SMatthias Ringwald         log_info("SM: MITM not required by both -> JUST WORKS");
75627c32905SMatthias Ringwald         return;
75727c32905SMatthias Ringwald     }
75827c32905SMatthias Ringwald 
75927c32905SMatthias Ringwald     // TODO: with LE SC, OOB is used to transfer data OOB during pairing, single device with OOB is sufficient
76027c32905SMatthias Ringwald 
7613deb3ec6SMatthias Ringwald     // If both devices have out of band authentication data, then the Authentication
7623deb3ec6SMatthias Ringwald     // Requirements Flags shall be ignored when selecting the pairing method and the
7633deb3ec6SMatthias Ringwald     // Out of Band pairing method shall be used.
7641ad129beSMatthias Ringwald     if (sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq)
7651ad129beSMatthias Ringwald     &&  sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres)){
7663deb3ec6SMatthias Ringwald         log_info("SM: have OOB data");
7678314c363SMatthias Ringwald         log_info_key("OOB", setup->sm_tk);
7683deb3ec6SMatthias Ringwald         setup->sm_stk_generation_method = OOB;
7693deb3ec6SMatthias Ringwald         return;
7703deb3ec6SMatthias Ringwald     }
7713deb3ec6SMatthias Ringwald 
7723deb3ec6SMatthias Ringwald     // Reset TK as it has been setup in sm_init_setup
7733deb3ec6SMatthias Ringwald     sm_reset_tk();
7743deb3ec6SMatthias Ringwald 
7753deb3ec6SMatthias Ringwald     // Also use just works if unknown io capabilites
7768da2e96dSMatthias 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)){
7773deb3ec6SMatthias Ringwald         return;
7783deb3ec6SMatthias Ringwald     }
7793deb3ec6SMatthias Ringwald 
7803deb3ec6SMatthias Ringwald     // Otherwise the IO capabilities of the devices shall be used to determine the
7813deb3ec6SMatthias Ringwald     // pairing method as defined in Table 2.4.
78227c32905SMatthias Ringwald     // see http://stackoverflow.com/a/1052837/393697 for how to specify pointer to 2-dimensional array
78327c32905SMatthias Ringwald     const stk_generation_method_t (*generation_method)[5] = stk_generation_method;
78427c32905SMatthias Ringwald 
78527c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
786c6b7cbd9SMatthias Ringwald     // table not define by default
78727c32905SMatthias Ringwald     if (setup->sm_use_secure_connections){
78827c32905SMatthias Ringwald         generation_method = stk_generation_method_with_secure_connection;
78927c32905SMatthias Ringwald     }
79027c32905SMatthias Ringwald #endif
79127c32905SMatthias 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)];
79227c32905SMatthias Ringwald 
7933deb3ec6SMatthias Ringwald     log_info("sm_setup_tk: master io cap: %u, slave io cap: %u -> method %u",
7941ad129beSMatthias 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);
7953deb3ec6SMatthias Ringwald }
7963deb3ec6SMatthias Ringwald 
7973deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_set(uint8_t key_set){
7983deb3ec6SMatthias Ringwald     int flags = 0;
7993deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_ENC_KEY){
8003deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
8013deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
8023deb3ec6SMatthias Ringwald     }
8033deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_ID_KEY){
8043deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
8053deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
8063deb3ec6SMatthias Ringwald     }
8073deb3ec6SMatthias Ringwald     if (key_set & SM_KEYDIST_SIGN){
8083deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
8093deb3ec6SMatthias Ringwald     }
8103deb3ec6SMatthias Ringwald     return flags;
8113deb3ec6SMatthias Ringwald }
8123deb3ec6SMatthias Ringwald 
8133deb3ec6SMatthias Ringwald static void sm_setup_key_distribution(uint8_t key_set){
8143deb3ec6SMatthias Ringwald     setup->sm_key_distribution_received_set = 0;
8153deb3ec6SMatthias Ringwald     setup->sm_key_distribution_send_set = sm_key_distribution_flags_for_set(key_set);
8163deb3ec6SMatthias Ringwald }
8173deb3ec6SMatthias Ringwald 
8183deb3ec6SMatthias Ringwald // CSRK Key Lookup
8193deb3ec6SMatthias Ringwald 
8203deb3ec6SMatthias Ringwald 
8213deb3ec6SMatthias Ringwald static int sm_address_resolution_idle(void){
8223deb3ec6SMatthias Ringwald     return sm_address_resolution_mode == ADDRESS_RESOLUTION_IDLE;
8233deb3ec6SMatthias Ringwald }
8243deb3ec6SMatthias Ringwald 
825711e6c80SMatthias 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){
8263deb3ec6SMatthias Ringwald     memcpy(sm_address_resolution_address, addr, 6);
8273deb3ec6SMatthias Ringwald     sm_address_resolution_addr_type = addr_type;
8283deb3ec6SMatthias Ringwald     sm_address_resolution_test = 0;
8293deb3ec6SMatthias Ringwald     sm_address_resolution_mode = mode;
8303deb3ec6SMatthias Ringwald     sm_address_resolution_context = context;
831711e6c80SMatthias Ringwald     sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_STARTED, con_handle, addr_type, addr);
8323deb3ec6SMatthias Ringwald }
8333deb3ec6SMatthias Ringwald 
8343deb3ec6SMatthias Ringwald int sm_address_resolution_lookup(uint8_t address_type, bd_addr_t address){
8353deb3ec6SMatthias Ringwald     // check if already in list
836665d90f2SMatthias Ringwald     btstack_linked_list_iterator_t it;
8373deb3ec6SMatthias Ringwald     sm_lookup_entry_t * entry;
838665d90f2SMatthias Ringwald     btstack_linked_list_iterator_init(&it, &sm_address_resolution_general_queue);
839665d90f2SMatthias Ringwald     while(btstack_linked_list_iterator_has_next(&it)){
840665d90f2SMatthias Ringwald         entry = (sm_lookup_entry_t *) btstack_linked_list_iterator_next(&it);
8413deb3ec6SMatthias Ringwald         if (entry->address_type != address_type) continue;
8423deb3ec6SMatthias Ringwald         if (memcmp(entry->address, address, 6))  continue;
8433deb3ec6SMatthias Ringwald         // already in list
8443deb3ec6SMatthias Ringwald         return BTSTACK_BUSY;
8453deb3ec6SMatthias Ringwald     }
8463deb3ec6SMatthias Ringwald     entry = btstack_memory_sm_lookup_entry_get();
8473deb3ec6SMatthias Ringwald     if (!entry) return BTSTACK_MEMORY_ALLOC_FAILED;
8483deb3ec6SMatthias Ringwald     entry->address_type = (bd_addr_type_t) address_type;
8493deb3ec6SMatthias Ringwald     memcpy(entry->address, address, 6);
850665d90f2SMatthias Ringwald     btstack_linked_list_add(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry);
8513deb3ec6SMatthias Ringwald     sm_run();
8523deb3ec6SMatthias Ringwald     return 0;
8533deb3ec6SMatthias Ringwald }
8543deb3ec6SMatthias Ringwald 
8553deb3ec6SMatthias 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
8563deb3ec6SMatthias Ringwald static inline void sm_next_responding_state(sm_connection_t * sm_conn){
8573deb3ec6SMatthias Ringwald     sm_conn->sm_engine_state = (security_manager_state_t) (((int)sm_conn->sm_engine_state) + 1);
8583deb3ec6SMatthias Ringwald }
8593deb3ec6SMatthias Ringwald static inline void dkg_next_state(void){
8603deb3ec6SMatthias Ringwald     dkg_state = (derived_key_generation_t) (((int)dkg_state) + 1);
8613deb3ec6SMatthias Ringwald }
8623deb3ec6SMatthias Ringwald static inline void rau_next_state(void){
8633deb3ec6SMatthias Ringwald     rau_state = (random_address_update_t) (((int)rau_state) + 1);
8643deb3ec6SMatthias Ringwald }
865514d35fcSMatthias Ringwald 
866514d35fcSMatthias Ringwald // CMAC calculation using AES Engine
8677a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
868514d35fcSMatthias Ringwald 
8693deb3ec6SMatthias Ringwald static inline void sm_cmac_next_state(void){
8703deb3ec6SMatthias Ringwald     sm_cmac_state = (cmac_state_t) (((int)sm_cmac_state) + 1);
8713deb3ec6SMatthias Ringwald }
872514d35fcSMatthias Ringwald 
8733deb3ec6SMatthias Ringwald static int sm_cmac_last_block_complete(void){
8743deb3ec6SMatthias Ringwald     if (sm_cmac_message_len == 0) return 0;
8753deb3ec6SMatthias Ringwald     return (sm_cmac_message_len & 0x0f) == 0;
8763deb3ec6SMatthias Ringwald }
877514d35fcSMatthias Ringwald 
8784dfd504aSMatthias Ringwald int sm_cmac_ready(void){
8794dfd504aSMatthias Ringwald     return sm_cmac_state == CMAC_IDLE;
8803deb3ec6SMatthias Ringwald }
8813deb3ec6SMatthias Ringwald 
882514d35fcSMatthias Ringwald // generic cmac calculation
883aec94140SMatthias 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])){
884514d35fcSMatthias Ringwald     // Generalized CMAC
885514d35fcSMatthias Ringwald     memcpy(sm_cmac_k, key, 16);
8863deb3ec6SMatthias Ringwald     memset(sm_cmac_x, 0, 16);
887514d35fcSMatthias Ringwald     sm_cmac_block_current = 0;
888514d35fcSMatthias Ringwald     sm_cmac_message_len  = message_len;
889514d35fcSMatthias Ringwald     sm_cmac_done_handler = done_callback;
890514d35fcSMatthias Ringwald     sm_cmac_get_byte     = get_byte_callback;
8913deb3ec6SMatthias Ringwald 
8923deb3ec6SMatthias Ringwald     // step 2: n := ceil(len/const_Bsize);
8933deb3ec6SMatthias Ringwald     sm_cmac_block_count = (sm_cmac_message_len + 15) / 16;
8943deb3ec6SMatthias Ringwald 
8953deb3ec6SMatthias Ringwald     // step 3: ..
8963deb3ec6SMatthias Ringwald     if (sm_cmac_block_count==0){
8973deb3ec6SMatthias Ringwald         sm_cmac_block_count = 1;
8983deb3ec6SMatthias Ringwald     }
899514d35fcSMatthias Ringwald     log_info("sm_cmac_general_start: len %u, block count %u", sm_cmac_message_len, sm_cmac_block_count);
9003deb3ec6SMatthias Ringwald 
9013deb3ec6SMatthias Ringwald     // first, we need to compute l for k1, k2, and m_last
9023deb3ec6SMatthias Ringwald     sm_cmac_state = CMAC_CALC_SUBKEYS;
9033deb3ec6SMatthias Ringwald 
9043deb3ec6SMatthias Ringwald     // let's go
9053deb3ec6SMatthias Ringwald     sm_run();
9063deb3ec6SMatthias Ringwald }
9077a766ebfSMatthias Ringwald #endif
9083deb3ec6SMatthias Ringwald 
909514d35fcSMatthias Ringwald // cmac for ATT Message signing
9107a766ebfSMatthias Ringwald #ifdef ENABLE_LE_SIGNED_WRITE
9114dfd504aSMatthias Ringwald static uint8_t sm_cmac_signed_write_message_get_byte(uint16_t offset){
9124dfd504aSMatthias Ringwald     if (offset >= sm_cmac_message_len) {
9134dfd504aSMatthias Ringwald         log_error("sm_cmac_signed_write_message_get_byte. out of bounds, access %u, len %u", offset, sm_cmac_message_len);
9144dfd504aSMatthias Ringwald         return 0;
9154dfd504aSMatthias Ringwald     }
9164dfd504aSMatthias Ringwald 
9174dfd504aSMatthias Ringwald     offset = sm_cmac_message_len - 1 - offset;
9184dfd504aSMatthias Ringwald 
9194dfd504aSMatthias Ringwald     // sm_cmac_header[3] | message[] | sm_cmac_sign_counter[4]
9204dfd504aSMatthias Ringwald     if (offset < 3){
9214dfd504aSMatthias Ringwald         return sm_cmac_header[offset];
9224dfd504aSMatthias Ringwald     }
9234dfd504aSMatthias Ringwald     int actual_message_len_incl_header = sm_cmac_message_len - 4;
9244dfd504aSMatthias Ringwald     if (offset <  actual_message_len_incl_header){
9254dfd504aSMatthias Ringwald         return sm_cmac_message[offset - 3];
9264dfd504aSMatthias Ringwald     }
9274dfd504aSMatthias Ringwald     return sm_cmac_sign_counter[offset - actual_message_len_incl_header];
9284dfd504aSMatthias Ringwald }
9294dfd504aSMatthias Ringwald 
9304dfd504aSMatthias Ringwald void sm_cmac_signed_write_start(const sm_key_t k, uint8_t opcode, hci_con_handle_t con_handle, uint16_t message_len, const uint8_t * message, uint32_t sign_counter, void (*done_handler)(uint8_t * hash)){
931514d35fcSMatthias Ringwald     // ATT Message Signing
932514d35fcSMatthias Ringwald     sm_cmac_header[0] = opcode;
933514d35fcSMatthias Ringwald     little_endian_store_16(sm_cmac_header, 1, con_handle);
934514d35fcSMatthias Ringwald     little_endian_store_32(sm_cmac_sign_counter, 0, sign_counter);
935514d35fcSMatthias Ringwald     uint16_t total_message_len = 3 + message_len + 4;  // incl. virtually prepended att opcode, handle and appended sign_counter in LE
936514d35fcSMatthias Ringwald     sm_cmac_message = message;
9374dfd504aSMatthias Ringwald     sm_cmac_general_start(k, total_message_len, &sm_cmac_signed_write_message_get_byte, done_handler);
938514d35fcSMatthias Ringwald }
9397a766ebfSMatthias Ringwald #endif
940514d35fcSMatthias Ringwald 
9417a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
9423deb3ec6SMatthias Ringwald static void sm_cmac_handle_aes_engine_ready(void){
9433deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
9443deb3ec6SMatthias Ringwald         case CMAC_CALC_SUBKEYS: {
9453deb3ec6SMatthias Ringwald             sm_key_t const_zero;
9463deb3ec6SMatthias Ringwald             memset(const_zero, 0, 16);
9473deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9483deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, const_zero, NULL);
9493deb3ec6SMatthias Ringwald             break;
9503deb3ec6SMatthias Ringwald         }
9513deb3ec6SMatthias Ringwald         case CMAC_CALC_MI: {
9523deb3ec6SMatthias Ringwald             int j;
9533deb3ec6SMatthias Ringwald             sm_key_t y;
9543deb3ec6SMatthias Ringwald             for (j=0;j<16;j++){
955514d35fcSMatthias Ringwald                 y[j] = sm_cmac_x[j] ^ sm_cmac_get_byte(sm_cmac_block_current*16 + j);
9563deb3ec6SMatthias Ringwald             }
9573deb3ec6SMatthias Ringwald             sm_cmac_block_current++;
9583deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9593deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, y, NULL);
9603deb3ec6SMatthias Ringwald             break;
9613deb3ec6SMatthias Ringwald         }
9623deb3ec6SMatthias Ringwald         case CMAC_CALC_MLAST: {
9633deb3ec6SMatthias Ringwald             int i;
9643deb3ec6SMatthias Ringwald             sm_key_t y;
9653deb3ec6SMatthias Ringwald             for (i=0;i<16;i++){
9663deb3ec6SMatthias Ringwald                 y[i] = sm_cmac_x[i] ^ sm_cmac_m_last[i];
9673deb3ec6SMatthias Ringwald             }
9688314c363SMatthias Ringwald             log_info_key("Y", y);
9693deb3ec6SMatthias Ringwald             sm_cmac_block_current++;
9703deb3ec6SMatthias Ringwald             sm_cmac_next_state();
9713deb3ec6SMatthias Ringwald             sm_aes128_start(sm_cmac_k, y, NULL);
9723deb3ec6SMatthias Ringwald             break;
9733deb3ec6SMatthias Ringwald         }
9743deb3ec6SMatthias Ringwald         default:
9753deb3ec6SMatthias Ringwald             log_info("sm_cmac_handle_aes_engine_ready called in state %u", sm_cmac_state);
9763deb3ec6SMatthias Ringwald             break;
9773deb3ec6SMatthias Ringwald     }
9783deb3ec6SMatthias Ringwald }
9793deb3ec6SMatthias Ringwald 
9807a766ebfSMatthias Ringwald // CMAC Implementation using AES128 engine
9817a766ebfSMatthias Ringwald static void sm_shift_left_by_one_bit_inplace(int len, uint8_t * data){
9827a766ebfSMatthias Ringwald     int i;
9837a766ebfSMatthias Ringwald     int carry = 0;
9847a766ebfSMatthias Ringwald     for (i=len-1; i >= 0 ; i--){
9857a766ebfSMatthias Ringwald         int new_carry = data[i] >> 7;
9867a766ebfSMatthias Ringwald         data[i] = data[i] << 1 | carry;
9877a766ebfSMatthias Ringwald         carry = new_carry;
9887a766ebfSMatthias Ringwald     }
9897a766ebfSMatthias Ringwald }
9907a766ebfSMatthias Ringwald 
9913deb3ec6SMatthias Ringwald static void sm_cmac_handle_encryption_result(sm_key_t data){
9923deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
9933deb3ec6SMatthias Ringwald         case CMAC_W4_SUBKEYS: {
9943deb3ec6SMatthias Ringwald             sm_key_t k1;
9953deb3ec6SMatthias Ringwald             memcpy(k1, data, 16);
9963deb3ec6SMatthias Ringwald             sm_shift_left_by_one_bit_inplace(16, k1);
9973deb3ec6SMatthias Ringwald             if (data[0] & 0x80){
9983deb3ec6SMatthias Ringwald                 k1[15] ^= 0x87;
9993deb3ec6SMatthias Ringwald             }
10003deb3ec6SMatthias Ringwald             sm_key_t k2;
10013deb3ec6SMatthias Ringwald             memcpy(k2, k1, 16);
10023deb3ec6SMatthias Ringwald             sm_shift_left_by_one_bit_inplace(16, k2);
10033deb3ec6SMatthias Ringwald             if (k1[0] & 0x80){
10043deb3ec6SMatthias Ringwald                 k2[15] ^= 0x87;
10053deb3ec6SMatthias Ringwald             }
10063deb3ec6SMatthias Ringwald 
10078314c363SMatthias Ringwald             log_info_key("k", sm_cmac_k);
10088314c363SMatthias Ringwald             log_info_key("k1", k1);
10098314c363SMatthias Ringwald             log_info_key("k2", k2);
10103deb3ec6SMatthias Ringwald 
10113deb3ec6SMatthias Ringwald             // step 4: set m_last
10123deb3ec6SMatthias Ringwald             int i;
10133deb3ec6SMatthias Ringwald             if (sm_cmac_last_block_complete()){
10143deb3ec6SMatthias Ringwald                 for (i=0;i<16;i++){
1015514d35fcSMatthias Ringwald                     sm_cmac_m_last[i] = sm_cmac_get_byte(sm_cmac_message_len - 16 + i) ^ k1[i];
10163deb3ec6SMatthias Ringwald                 }
10173deb3ec6SMatthias Ringwald             } else {
10183deb3ec6SMatthias Ringwald                 int valid_octets_in_last_block = sm_cmac_message_len & 0x0f;
10193deb3ec6SMatthias Ringwald                 for (i=0;i<16;i++){
10203deb3ec6SMatthias Ringwald                     if (i < valid_octets_in_last_block){
1021514d35fcSMatthias Ringwald                         sm_cmac_m_last[i] = sm_cmac_get_byte((sm_cmac_message_len & 0xfff0) + i) ^ k2[i];
10223deb3ec6SMatthias Ringwald                         continue;
10233deb3ec6SMatthias Ringwald                     }
10243deb3ec6SMatthias Ringwald                     if (i == valid_octets_in_last_block){
10253deb3ec6SMatthias Ringwald                         sm_cmac_m_last[i] = 0x80 ^ k2[i];
10263deb3ec6SMatthias Ringwald                         continue;
10273deb3ec6SMatthias Ringwald                     }
10283deb3ec6SMatthias Ringwald                     sm_cmac_m_last[i] = k2[i];
10293deb3ec6SMatthias Ringwald                 }
10303deb3ec6SMatthias Ringwald             }
10313deb3ec6SMatthias Ringwald 
10323deb3ec6SMatthias Ringwald             // next
10333deb3ec6SMatthias Ringwald             sm_cmac_state = sm_cmac_block_current < sm_cmac_block_count - 1 ? CMAC_CALC_MI : CMAC_CALC_MLAST;
10343deb3ec6SMatthias Ringwald             break;
10353deb3ec6SMatthias Ringwald         }
10363deb3ec6SMatthias Ringwald         case CMAC_W4_MI:
10373deb3ec6SMatthias Ringwald             memcpy(sm_cmac_x, data, 16);
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         case CMAC_W4_MLAST:
10413deb3ec6SMatthias Ringwald             // done
10420346c37cSMatthias Ringwald             log_info("Setting CMAC Engine to IDLE");
10430346c37cSMatthias Ringwald             sm_cmac_state = CMAC_IDLE;
10448314c363SMatthias Ringwald             log_info_key("CMAC", data);
10453deb3ec6SMatthias Ringwald             sm_cmac_done_handler(data);
10463deb3ec6SMatthias Ringwald             break;
10473deb3ec6SMatthias Ringwald         default:
10483deb3ec6SMatthias Ringwald             log_info("sm_cmac_handle_encryption_result called in state %u", sm_cmac_state);
10493deb3ec6SMatthias Ringwald             break;
10503deb3ec6SMatthias Ringwald     }
10513deb3ec6SMatthias Ringwald }
10527a766ebfSMatthias Ringwald #endif
10533deb3ec6SMatthias Ringwald 
10543deb3ec6SMatthias Ringwald static void sm_trigger_user_response(sm_connection_t * sm_conn){
1055446a8c36SMatthias Ringwald     // notify client for: JUST WORKS confirm, Numeric comparison confirm, PASSKEY display or input
10563deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_IDLE;
10573deb3ec6SMatthias Ringwald     switch (setup->sm_stk_generation_method){
10583deb3ec6SMatthias Ringwald         case PK_RESP_INPUT:
10593deb3ec6SMatthias Ringwald             if (sm_conn->sm_role){
10603deb3ec6SMatthias Ringwald                 setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10615611a760SMatthias 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);
10623deb3ec6SMatthias Ringwald             } else {
1063c9b8fdd9SMatthias 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));
10643deb3ec6SMatthias Ringwald             }
10653deb3ec6SMatthias Ringwald             break;
10663deb3ec6SMatthias Ringwald         case PK_INIT_INPUT:
10673deb3ec6SMatthias Ringwald             if (sm_conn->sm_role){
1068c9b8fdd9SMatthias 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));
10693deb3ec6SMatthias Ringwald             } else {
10703deb3ec6SMatthias Ringwald                 setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10715611a760SMatthias 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);
10723deb3ec6SMatthias Ringwald             }
10733deb3ec6SMatthias Ringwald             break;
10743deb3ec6SMatthias Ringwald         case OK_BOTH_INPUT:
10753deb3ec6SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10765611a760SMatthias 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);
10773deb3ec6SMatthias Ringwald             break;
107827c32905SMatthias Ringwald         case NK_BOTH_INPUT:
1079446a8c36SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
1080c8c46d51SMatthias 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));
108127c32905SMatthias Ringwald             break;
10823deb3ec6SMatthias Ringwald         case JUST_WORKS:
10833deb3ec6SMatthias Ringwald             setup->sm_user_response = SM_USER_RESPONSE_PENDING;
10845611a760SMatthias 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);
10853deb3ec6SMatthias Ringwald             break;
10863deb3ec6SMatthias Ringwald         case OOB:
10873deb3ec6SMatthias Ringwald             // client already provided OOB data, let's skip notification.
10883deb3ec6SMatthias Ringwald             break;
10893deb3ec6SMatthias Ringwald     }
10903deb3ec6SMatthias Ringwald }
10913deb3ec6SMatthias Ringwald 
10923deb3ec6SMatthias Ringwald static int sm_key_distribution_all_received(sm_connection_t * sm_conn){
10933deb3ec6SMatthias Ringwald     int recv_flags;
10943deb3ec6SMatthias Ringwald     if (sm_conn->sm_role){
109552f9cf63SMatthias Ringwald         // slave / responder
10961ad129beSMatthias Ringwald         recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres));
10973deb3ec6SMatthias Ringwald     } else {
10983deb3ec6SMatthias Ringwald         // master / initiator
10991ad129beSMatthias Ringwald         recv_flags = sm_key_distribution_flags_for_set(sm_pairing_packet_get_responder_key_distribution(setup->sm_s_pres));
11003deb3ec6SMatthias Ringwald     }
11013deb3ec6SMatthias Ringwald     log_debug("sm_key_distribution_all_received: received 0x%02x, expecting 0x%02x", setup->sm_key_distribution_received_set, recv_flags);
11023deb3ec6SMatthias Ringwald     return recv_flags == setup->sm_key_distribution_received_set;
11033deb3ec6SMatthias Ringwald }
11043deb3ec6SMatthias Ringwald 
1105711e6c80SMatthias Ringwald static void sm_done_for_handle(hci_con_handle_t con_handle){
1106711e6c80SMatthias Ringwald     if (sm_active_connection == con_handle){
11073deb3ec6SMatthias Ringwald         sm_timeout_stop();
11083deb3ec6SMatthias Ringwald         sm_active_connection = 0;
1109711e6c80SMatthias Ringwald         log_info("sm: connection 0x%x released setup context", con_handle);
11103deb3ec6SMatthias Ringwald     }
11113deb3ec6SMatthias Ringwald }
11123deb3ec6SMatthias Ringwald 
11133deb3ec6SMatthias Ringwald static int sm_key_distribution_flags_for_auth_req(void){
11143deb3ec6SMatthias Ringwald     int flags = SM_KEYDIST_ID_KEY | SM_KEYDIST_SIGN;
11153deb3ec6SMatthias Ringwald     if (sm_auth_req & SM_AUTHREQ_BONDING){
11163deb3ec6SMatthias Ringwald         // encryption information only if bonding requested
11173deb3ec6SMatthias Ringwald         flags |= SM_KEYDIST_ENC_KEY;
11183deb3ec6SMatthias Ringwald     }
11193deb3ec6SMatthias Ringwald     return flags;
11203deb3ec6SMatthias Ringwald }
11213deb3ec6SMatthias Ringwald 
1122d7471931SMatthias Ringwald static void sm_reset_setup(void){
11233deb3ec6SMatthias Ringwald     // fill in sm setup
1124901c000fSMatthias Ringwald     setup->sm_state_vars = 0;
11253d7fe1e9SMatthias Ringwald     setup->sm_keypress_notification = 0xff;
11263deb3ec6SMatthias Ringwald     sm_reset_tk();
1127d7471931SMatthias Ringwald }
1128d7471931SMatthias Ringwald 
1129d7471931SMatthias Ringwald static void sm_init_setup(sm_connection_t * sm_conn){
1130d7471931SMatthias Ringwald 
1131d7471931SMatthias Ringwald     // fill in sm setup
11323deb3ec6SMatthias Ringwald     setup->sm_peer_addr_type = sm_conn->sm_peer_addr_type;
11333deb3ec6SMatthias Ringwald     memcpy(setup->sm_peer_address, sm_conn->sm_peer_address, 6);
11343deb3ec6SMatthias Ringwald 
11353deb3ec6SMatthias Ringwald     // query client for OOB data
11363deb3ec6SMatthias Ringwald     int have_oob_data = 0;
11373deb3ec6SMatthias Ringwald     if (sm_get_oob_data) {
11383deb3ec6SMatthias Ringwald         have_oob_data = (*sm_get_oob_data)(sm_conn->sm_peer_addr_type, sm_conn->sm_peer_address, setup->sm_tk);
11393deb3ec6SMatthias Ringwald     }
11403deb3ec6SMatthias Ringwald 
11413deb3ec6SMatthias Ringwald     sm_pairing_packet_t * local_packet;
11423deb3ec6SMatthias Ringwald     if (sm_conn->sm_role){
11433deb3ec6SMatthias Ringwald         // slave
11443deb3ec6SMatthias Ringwald         local_packet = &setup->sm_s_pres;
114515a95bd5SMatthias Ringwald         gap_advertisements_get_address(&setup->sm_s_addr_type, setup->sm_s_address);
11463deb3ec6SMatthias Ringwald         setup->sm_m_addr_type = sm_conn->sm_peer_addr_type;
11473deb3ec6SMatthias Ringwald         memcpy(setup->sm_m_address, sm_conn->sm_peer_address, 6);
11483deb3ec6SMatthias Ringwald     } else {
11493deb3ec6SMatthias Ringwald         // master
11503deb3ec6SMatthias Ringwald         local_packet = &setup->sm_m_preq;
115115a95bd5SMatthias Ringwald         gap_advertisements_get_address(&setup->sm_m_addr_type, setup->sm_m_address);
11523deb3ec6SMatthias Ringwald         setup->sm_s_addr_type = sm_conn->sm_peer_addr_type;
11533deb3ec6SMatthias Ringwald         memcpy(setup->sm_s_address, sm_conn->sm_peer_address, 6);
11543deb3ec6SMatthias Ringwald 
11553deb3ec6SMatthias Ringwald         int key_distribution_flags = sm_key_distribution_flags_for_auth_req();
11561ad129beSMatthias Ringwald         sm_pairing_packet_set_initiator_key_distribution(setup->sm_m_preq, key_distribution_flags);
11571ad129beSMatthias Ringwald         sm_pairing_packet_set_responder_key_distribution(setup->sm_m_preq, key_distribution_flags);
11583deb3ec6SMatthias Ringwald     }
11593deb3ec6SMatthias Ringwald 
1160df86eb96SMatthias Ringwald     uint8_t auth_req = sm_auth_req;
11611ad129beSMatthias Ringwald     sm_pairing_packet_set_io_capability(*local_packet, sm_io_capabilities);
11621ad129beSMatthias Ringwald     sm_pairing_packet_set_oob_data_flag(*local_packet, have_oob_data);
1163df86eb96SMatthias Ringwald     sm_pairing_packet_set_auth_req(*local_packet, auth_req);
11641ad129beSMatthias Ringwald     sm_pairing_packet_set_max_encryption_key_size(*local_packet, sm_max_encryption_key_size);
11653deb3ec6SMatthias Ringwald }
11663deb3ec6SMatthias Ringwald 
11673deb3ec6SMatthias Ringwald static int sm_stk_generation_init(sm_connection_t * sm_conn){
11683deb3ec6SMatthias Ringwald 
11693deb3ec6SMatthias Ringwald     sm_pairing_packet_t * remote_packet;
11703deb3ec6SMatthias Ringwald     int                   remote_key_request;
11713deb3ec6SMatthias Ringwald     if (sm_conn->sm_role){
117252f9cf63SMatthias Ringwald         // slave / responder
11733deb3ec6SMatthias Ringwald         remote_packet      = &setup->sm_m_preq;
11741ad129beSMatthias Ringwald         remote_key_request = sm_pairing_packet_get_responder_key_distribution(setup->sm_m_preq);
11753deb3ec6SMatthias Ringwald     } else {
11763deb3ec6SMatthias Ringwald         // master / initiator
11773deb3ec6SMatthias Ringwald         remote_packet      = &setup->sm_s_pres;
11781ad129beSMatthias Ringwald         remote_key_request = sm_pairing_packet_get_initiator_key_distribution(setup->sm_s_pres);
11793deb3ec6SMatthias Ringwald     }
11803deb3ec6SMatthias Ringwald 
11813deb3ec6SMatthias Ringwald     // check key size
11821ad129beSMatthias Ringwald     sm_conn->sm_actual_encryption_key_size = sm_calc_actual_encryption_key_size(sm_pairing_packet_get_max_encryption_key_size(*remote_packet));
11833deb3ec6SMatthias Ringwald     if (sm_conn->sm_actual_encryption_key_size == 0) return SM_REASON_ENCRYPTION_KEY_SIZE;
11843deb3ec6SMatthias Ringwald 
11853deb3ec6SMatthias Ringwald     // decide on STK generation method
11863deb3ec6SMatthias Ringwald     sm_setup_tk();
11873deb3ec6SMatthias Ringwald     log_info("SMP: generation method %u", setup->sm_stk_generation_method);
11883deb3ec6SMatthias Ringwald 
11893deb3ec6SMatthias Ringwald     // check if STK generation method is acceptable by client
11903deb3ec6SMatthias Ringwald     if (!sm_validate_stk_generation_method()) return SM_REASON_AUTHENTHICATION_REQUIREMENTS;
11913deb3ec6SMatthias Ringwald 
119252f9cf63SMatthias Ringwald     // identical to responder
119352f9cf63SMatthias Ringwald     sm_setup_key_distribution(remote_key_request);
119452f9cf63SMatthias Ringwald 
11953deb3ec6SMatthias Ringwald     // JUST WORKS doens't provide authentication
11963deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authenticated = setup->sm_stk_generation_method == JUST_WORKS ? 0 : 1;
11973deb3ec6SMatthias Ringwald 
11983deb3ec6SMatthias Ringwald     return 0;
11993deb3ec6SMatthias Ringwald }
12003deb3ec6SMatthias Ringwald 
12013deb3ec6SMatthias Ringwald static void sm_address_resolution_handle_event(address_resolution_event_t event){
12023deb3ec6SMatthias Ringwald 
12033deb3ec6SMatthias Ringwald     // cache and reset context
12043deb3ec6SMatthias Ringwald     int matched_device_id = sm_address_resolution_test;
12053deb3ec6SMatthias Ringwald     address_resolution_mode_t mode = sm_address_resolution_mode;
12063deb3ec6SMatthias Ringwald     void * context = sm_address_resolution_context;
12073deb3ec6SMatthias Ringwald 
12083deb3ec6SMatthias Ringwald     // reset context
12093deb3ec6SMatthias Ringwald     sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE;
12103deb3ec6SMatthias Ringwald     sm_address_resolution_context = NULL;
12113deb3ec6SMatthias Ringwald     sm_address_resolution_test = -1;
1212711e6c80SMatthias Ringwald     hci_con_handle_t con_handle = 0;
12133deb3ec6SMatthias Ringwald 
12143deb3ec6SMatthias Ringwald     sm_connection_t * sm_connection;
1215d2e90122SMatthias Ringwald     sm_key_t ltk;
12163deb3ec6SMatthias Ringwald     switch (mode){
12173deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_GENERAL:
12183deb3ec6SMatthias Ringwald             break;
12193deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_FOR_CONNECTION:
12203deb3ec6SMatthias Ringwald             sm_connection = (sm_connection_t *) context;
1221711e6c80SMatthias Ringwald             con_handle = sm_connection->sm_handle;
12223deb3ec6SMatthias Ringwald             switch (event){
12233deb3ec6SMatthias Ringwald                 case ADDRESS_RESOLUTION_SUCEEDED:
12243deb3ec6SMatthias Ringwald                     sm_connection->sm_irk_lookup_state = IRK_LOOKUP_SUCCEEDED;
12253deb3ec6SMatthias Ringwald                     sm_connection->sm_le_db_index = matched_device_id;
12263deb3ec6SMatthias Ringwald                     log_info("ADDRESS_RESOLUTION_SUCEEDED, index %d", sm_connection->sm_le_db_index);
12273deb3ec6SMatthias Ringwald                     if (sm_connection->sm_role) break;
12283deb3ec6SMatthias Ringwald                     if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break;
12293deb3ec6SMatthias Ringwald                     sm_connection->sm_security_request_received = 0;
12303deb3ec6SMatthias Ringwald                     sm_connection->sm_bonding_requested = 0;
1231d2e90122SMatthias Ringwald                     le_device_db_encryption_get(sm_connection->sm_le_db_index, NULL, NULL, ltk, NULL, NULL, NULL);
1232d2e90122SMatthias Ringwald                     if (!sm_is_null_key(ltk)){
12333deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
12343deb3ec6SMatthias Ringwald                     } else {
12353deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
12363deb3ec6SMatthias Ringwald                     }
12373deb3ec6SMatthias Ringwald                     break;
12383deb3ec6SMatthias Ringwald                 case ADDRESS_RESOLUTION_FAILED:
12393deb3ec6SMatthias Ringwald                     sm_connection->sm_irk_lookup_state = IRK_LOOKUP_FAILED;
12403deb3ec6SMatthias Ringwald                     if (sm_connection->sm_role) break;
12413deb3ec6SMatthias Ringwald                     if (!sm_connection->sm_bonding_requested && !sm_connection->sm_security_request_received) break;
12423deb3ec6SMatthias Ringwald                     sm_connection->sm_security_request_received = 0;
12433deb3ec6SMatthias Ringwald                     sm_connection->sm_bonding_requested = 0;
12443deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
12453deb3ec6SMatthias Ringwald                     break;
12463deb3ec6SMatthias Ringwald             }
12473deb3ec6SMatthias Ringwald             break;
12483deb3ec6SMatthias Ringwald         default:
12493deb3ec6SMatthias Ringwald             break;
12503deb3ec6SMatthias Ringwald     }
12513deb3ec6SMatthias Ringwald 
12523deb3ec6SMatthias Ringwald     switch (event){
12533deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_SUCEEDED:
1254711e6c80SMatthias Ringwald             sm_notify_client_index(SM_EVENT_IDENTITY_RESOLVING_SUCCEEDED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address, matched_device_id);
12553deb3ec6SMatthias Ringwald             break;
12563deb3ec6SMatthias Ringwald         case ADDRESS_RESOLUTION_FAILED:
1257711e6c80SMatthias Ringwald             sm_notify_client_base(SM_EVENT_IDENTITY_RESOLVING_FAILED, con_handle, sm_address_resolution_addr_type, sm_address_resolution_address);
12583deb3ec6SMatthias Ringwald             break;
12593deb3ec6SMatthias Ringwald     }
12603deb3ec6SMatthias Ringwald }
12613deb3ec6SMatthias Ringwald 
12623deb3ec6SMatthias Ringwald static void sm_key_distribution_handle_all_received(sm_connection_t * sm_conn){
12633deb3ec6SMatthias Ringwald 
12643deb3ec6SMatthias Ringwald     int le_db_index = -1;
12653deb3ec6SMatthias Ringwald 
12663deb3ec6SMatthias Ringwald     // lookup device based on IRK
12673deb3ec6SMatthias Ringwald     if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_INFORMATION){
12683deb3ec6SMatthias Ringwald         int i;
12693deb3ec6SMatthias Ringwald         for (i=0; i < le_device_db_count(); i++){
12703deb3ec6SMatthias Ringwald             sm_key_t irk;
12713deb3ec6SMatthias Ringwald             bd_addr_t address;
12723deb3ec6SMatthias Ringwald             int address_type;
12733deb3ec6SMatthias Ringwald             le_device_db_info(i, &address_type, address, irk);
12743deb3ec6SMatthias Ringwald             if (memcmp(irk, setup->sm_peer_irk, 16) == 0){
12753deb3ec6SMatthias Ringwald                 log_info("sm: device found for IRK, updating");
12763deb3ec6SMatthias Ringwald                 le_db_index = i;
12773deb3ec6SMatthias Ringwald                 break;
12783deb3ec6SMatthias Ringwald             }
12793deb3ec6SMatthias Ringwald         }
12803deb3ec6SMatthias Ringwald     }
12813deb3ec6SMatthias Ringwald 
12823deb3ec6SMatthias Ringwald     // if not found, lookup via public address if possible
12833deb3ec6SMatthias Ringwald     log_info("sm peer addr type %u, peer addres %s", setup->sm_peer_addr_type, bd_addr_to_str(setup->sm_peer_address));
12843deb3ec6SMatthias Ringwald     if (le_db_index < 0 && setup->sm_peer_addr_type == BD_ADDR_TYPE_LE_PUBLIC){
12853deb3ec6SMatthias Ringwald         int i;
12863deb3ec6SMatthias Ringwald         for (i=0; i < le_device_db_count(); i++){
12873deb3ec6SMatthias Ringwald             bd_addr_t address;
12883deb3ec6SMatthias Ringwald             int address_type;
12893deb3ec6SMatthias Ringwald             le_device_db_info(i, &address_type, address, NULL);
12903deb3ec6SMatthias Ringwald             log_info("device %u, sm peer addr type %u, peer addres %s", i, address_type, bd_addr_to_str(address));
12913deb3ec6SMatthias Ringwald             if (address_type == BD_ADDR_TYPE_LE_PUBLIC && memcmp(address, setup->sm_peer_address, 6) == 0){
12923deb3ec6SMatthias Ringwald                 log_info("sm: device found for public address, updating");
12933deb3ec6SMatthias Ringwald                 le_db_index = i;
12943deb3ec6SMatthias Ringwald                 break;
12953deb3ec6SMatthias Ringwald             }
12963deb3ec6SMatthias Ringwald         }
12973deb3ec6SMatthias Ringwald     }
12983deb3ec6SMatthias Ringwald 
12993deb3ec6SMatthias Ringwald     // if not found, add to db
13003deb3ec6SMatthias Ringwald     if (le_db_index < 0) {
13013deb3ec6SMatthias Ringwald         le_db_index = le_device_db_add(setup->sm_peer_addr_type, setup->sm_peer_address, setup->sm_peer_irk);
13023deb3ec6SMatthias Ringwald     }
13033deb3ec6SMatthias Ringwald 
130413377825SMatthias Ringwald     sm_notify_client_index(SM_EVENT_IDENTITY_CREATED, sm_conn->sm_handle, setup->sm_peer_addr_type, setup->sm_peer_address, le_db_index);
130513377825SMatthias Ringwald 
13063deb3ec6SMatthias Ringwald     if (le_db_index >= 0){
13073deb3ec6SMatthias Ringwald 
13083deb3ec6SMatthias Ringwald         // store local CSRK
13093deb3ec6SMatthias Ringwald         if (setup->sm_key_distribution_send_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
13103deb3ec6SMatthias Ringwald             log_info("sm: store local CSRK");
13113deb3ec6SMatthias Ringwald             le_device_db_local_csrk_set(le_db_index, setup->sm_local_csrk);
13123deb3ec6SMatthias Ringwald             le_device_db_local_counter_set(le_db_index, 0);
13133deb3ec6SMatthias Ringwald         }
13143deb3ec6SMatthias Ringwald 
13153deb3ec6SMatthias Ringwald         // store remote CSRK
13163deb3ec6SMatthias Ringwald         if (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
13173deb3ec6SMatthias Ringwald             log_info("sm: store remote CSRK");
13183deb3ec6SMatthias Ringwald             le_device_db_remote_csrk_set(le_db_index, setup->sm_peer_csrk);
13193deb3ec6SMatthias Ringwald             le_device_db_remote_counter_set(le_db_index, 0);
13203deb3ec6SMatthias Ringwald         }
13213deb3ec6SMatthias Ringwald 
132278f44163SMatthias Ringwald         // store encryption information for secure connections: LTK generated by ECDH
132378f44163SMatthias Ringwald         if (setup->sm_use_secure_connections){
132478f44163SMatthias Ringwald             log_info("sm: store SC LTK (key size %u, authenticatd %u)", sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated);
132578f44163SMatthias Ringwald             uint8_t zero_rand[8];
132678f44163SMatthias Ringwald             memset(zero_rand, 0, 8);
132778f44163SMatthias Ringwald             le_device_db_encryption_set(le_db_index, 0, zero_rand, setup->sm_ltk, sm_conn->sm_actual_encryption_key_size,
132878f44163SMatthias Ringwald                 sm_conn->sm_connection_authenticated, sm_conn->sm_connection_authorization_state == AUTHORIZATION_GRANTED);
132978f44163SMatthias Ringwald         }
133078f44163SMatthias Ringwald 
133178f44163SMatthias Ringwald         // store encryption infromation for legacy pairing: peer LTK, EDIV, RAND
133278f44163SMatthias Ringwald         else if ( (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION)
133378f44163SMatthias Ringwald                && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_MASTER_IDENTIFICATION )){
13343deb3ec6SMatthias Ringwald             log_info("sm: set encryption information (key size %u, authenticatd %u)", sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated);
13353deb3ec6SMatthias Ringwald             le_device_db_encryption_set(le_db_index, setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk,
13363deb3ec6SMatthias Ringwald                 sm_conn->sm_actual_encryption_key_size, sm_conn->sm_connection_authenticated, sm_conn->sm_connection_authorization_state == AUTHORIZATION_GRANTED);
133778f44163SMatthias Ringwald 
13383deb3ec6SMatthias Ringwald         }
13393deb3ec6SMatthias Ringwald     }
13403deb3ec6SMatthias Ringwald 
13413deb3ec6SMatthias Ringwald     // keep le_db_index
13423deb3ec6SMatthias Ringwald     sm_conn->sm_le_db_index = le_db_index;
13433deb3ec6SMatthias Ringwald }
13443deb3ec6SMatthias Ringwald 
1345688a08f9SMatthias Ringwald static void sm_pairing_error(sm_connection_t * sm_conn, uint8_t reason){
1346688a08f9SMatthias Ringwald     setup->sm_pairing_failed_reason = reason;
1347688a08f9SMatthias Ringwald     sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
1348688a08f9SMatthias Ringwald }
1349688a08f9SMatthias Ringwald 
1350688a08f9SMatthias Ringwald static inline void sm_pdu_received_in_wrong_state(sm_connection_t * sm_conn){
1351688a08f9SMatthias Ringwald     sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON);
1352688a08f9SMatthias Ringwald }
1353688a08f9SMatthias Ringwald 
13549af0f475SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
1355688a08f9SMatthias Ringwald 
1356dc300847SMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn);
1357945888f5SMatthias Ringwald static int sm_passkey_used(stk_generation_method_t method);
1358f1c1783eSMatthias Ringwald static int sm_just_works_or_numeric_comparison(stk_generation_method_t method);
1359dc300847SMatthias Ringwald 
136068437d83SMatthias Ringwald static void sm_log_ec_keypair(void){
13612e6217a0SMatthias Ringwald     log_info("Elliptic curve: X");
13622e6217a0SMatthias Ringwald     log_info_hexdump(ec_qx,32);
13632e6217a0SMatthias Ringwald     log_info("Elliptic curve: Y");
13642e6217a0SMatthias Ringwald     log_info_hexdump(ec_qy,32);
136568437d83SMatthias Ringwald }
136668437d83SMatthias Ringwald 
1367b35a3de2SMatthias Ringwald static void sm_sc_start_calculating_local_confirm(sm_connection_t * sm_conn){
1368b35a3de2SMatthias Ringwald     if (sm_passkey_used(setup->sm_stk_generation_method)){
1369b35a3de2SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_W2_GET_RANDOM_A;
1370b35a3de2SMatthias Ringwald     } else {
13711f9d84e9SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION;
1372b35a3de2SMatthias Ringwald     }
1373b35a3de2SMatthias Ringwald }
1374b35a3de2SMatthias Ringwald 
1375688a08f9SMatthias Ringwald static void sm_sc_state_after_receiving_random(sm_connection_t * sm_conn){
1376688a08f9SMatthias Ringwald     if (sm_conn->sm_role){
1377688a08f9SMatthias Ringwald         // Responder
1378688a08f9SMatthias Ringwald         sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
1379688a08f9SMatthias Ringwald     } else {
1380688a08f9SMatthias Ringwald         // Initiator role
1381688a08f9SMatthias Ringwald         switch (setup->sm_stk_generation_method){
1382688a08f9SMatthias Ringwald             case JUST_WORKS:
1383dc300847SMatthias Ringwald                 sm_sc_prepare_dhkey_check(sm_conn);
1384688a08f9SMatthias Ringwald                 break;
1385688a08f9SMatthias Ringwald 
1386f92edc8eSMatthias Ringwald             case NK_BOTH_INPUT:
1387bd57ffebSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_G2;
1388688a08f9SMatthias Ringwald                 break;
1389688a08f9SMatthias Ringwald             case PK_INIT_INPUT:
1390688a08f9SMatthias Ringwald             case PK_RESP_INPUT:
1391688a08f9SMatthias Ringwald             case OK_BOTH_INPUT:
1392688a08f9SMatthias Ringwald                 if (setup->sm_passkey_bit < 20) {
1393b35a3de2SMatthias Ringwald                     sm_sc_start_calculating_local_confirm(sm_conn);
1394688a08f9SMatthias Ringwald                 } else {
1395dc300847SMatthias Ringwald                     sm_sc_prepare_dhkey_check(sm_conn);
1396688a08f9SMatthias Ringwald                 }
1397688a08f9SMatthias Ringwald                 break;
1398688a08f9SMatthias Ringwald             case OOB:
1399688a08f9SMatthias Ringwald                 // TODO: implement SC OOB
1400688a08f9SMatthias Ringwald                 break;
1401688a08f9SMatthias Ringwald         }
1402688a08f9SMatthias Ringwald     }
1403688a08f9SMatthias Ringwald }
1404688a08f9SMatthias Ringwald 
1405aec94140SMatthias Ringwald static uint8_t sm_sc_cmac_get_byte(uint16_t offset){
1406aec94140SMatthias Ringwald     return sm_cmac_sc_buffer[offset];
1407aec94140SMatthias Ringwald }
1408688a08f9SMatthias Ringwald 
1409aec94140SMatthias Ringwald static void sm_sc_cmac_done(uint8_t * hash){
1410688a08f9SMatthias Ringwald     log_info("sm_sc_cmac_done: ");
1411688a08f9SMatthias Ringwald     log_info_hexdump(hash, 16);
1412688a08f9SMatthias Ringwald 
1413bd57ffebSMatthias Ringwald     sm_connection_t * sm_conn = sm_cmac_connection;
1414bd57ffebSMatthias Ringwald     sm_cmac_connection = NULL;
14152bacf595SMatthias Ringwald     link_key_type_t link_key_type;
1416bd57ffebSMatthias Ringwald 
1417bd57ffebSMatthias Ringwald     switch (sm_conn->sm_engine_state){
1418aec94140SMatthias Ringwald         case SM_SC_W4_CMAC_FOR_CONFIRMATION:
1419aec94140SMatthias Ringwald             memcpy(setup->sm_local_confirm, hash, 16);
1420bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_SEND_CONFIRMATION;
1421aec94140SMatthias Ringwald             break;
1422688a08f9SMatthias Ringwald         case SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION:
1423688a08f9SMatthias Ringwald             // check
1424688a08f9SMatthias Ringwald             if (0 != memcmp(hash, setup->sm_peer_confirm, 16)){
1425bd57ffebSMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_CONFIRM_VALUE_FAILED);
1426688a08f9SMatthias Ringwald                 break;
1427688a08f9SMatthias Ringwald             }
1428bd57ffebSMatthias Ringwald             sm_sc_state_after_receiving_random(sm_conn);
1429688a08f9SMatthias Ringwald             break;
1430901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_G2: {
1431901c000fSMatthias Ringwald             uint32_t vab = big_endian_read_32(hash, 12) % 1000000;
1432901c000fSMatthias Ringwald             big_endian_store_32(setup->sm_tk, 12, vab);
1433901c000fSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
1434901c000fSMatthias Ringwald             sm_trigger_user_response(sm_conn);
1435019005a0SMatthias Ringwald             break;
1436019005a0SMatthias Ringwald         }
14370346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_SALT:
14380346c37cSMatthias Ringwald             memcpy(setup->sm_t, hash, 16);
1439bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_MACKEY;
14400346c37cSMatthias Ringwald             break;
14410346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_MACKEY:
14420346c37cSMatthias Ringwald             memcpy(setup->sm_mackey, hash, 16);
1443bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_LTK;
14440346c37cSMatthias Ringwald             break;
14450346c37cSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_LTK:
1446b18300a6SMatthias Ringwald             // truncate sm_ltk, but keep full LTK for cross-transport key derivation in sm_local_ltk
1447b18300a6SMatthias Ringwald             // Errata Service Release to the Bluetooth Specification: ESR09
1448b18300a6SMatthias Ringwald             //   E6405 – Cross transport key derivation from a key of size less than 128 bits
1449b18300a6SMatthias Ringwald             //   Note: When the BR/EDR link key is being derived from the LTK, the derivation is done before the LTK gets masked."
14500346c37cSMatthias Ringwald             memcpy(setup->sm_ltk, hash, 16);
1451aa7d4d9cSMatthias Ringwald             memcpy(setup->sm_local_ltk, hash, 16);
1452893e9333SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, sm_conn->sm_actual_encryption_key_size);
1453bd57ffebSMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK;
1454019005a0SMatthias Ringwald             break;
1455901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK:
1456901c000fSMatthias Ringwald             memcpy(setup->sm_local_dhkey_check, hash, 16);
1457901c000fSMatthias Ringwald             if (sm_conn->sm_role){
1458901c000fSMatthias Ringwald                 // responder
1459901c000fSMatthias Ringwald                 if (setup->sm_state_vars & SM_STATE_VAR_DHKEY_COMMAND_RECEIVED){
1460901c000fSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
1461901c000fSMatthias Ringwald                 } else {
1462901c000fSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND;
1463901c000fSMatthias Ringwald                 }
1464901c000fSMatthias Ringwald             } else {
1465901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_DHKEY_CHECK_COMMAND;
1466901c000fSMatthias Ringwald             }
1467901c000fSMatthias Ringwald             break;
1468901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK:
1469901c000fSMatthias Ringwald             if (0 != memcmp(hash, setup->sm_peer_dhkey_check, 16) ){
1470901c000fSMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_DHKEY_CHECK_FAILED);
1471aec94140SMatthias Ringwald                 break;
1472aec94140SMatthias Ringwald             }
1473901c000fSMatthias Ringwald             if (sm_conn->sm_role){
1474901c000fSMatthias Ringwald                 // responder
1475901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_DHKEY_CHECK_COMMAND;
1476901c000fSMatthias Ringwald             } else {
1477901c000fSMatthias Ringwald                 // initiator
1478901c000fSMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION;
1479bd57ffebSMatthias Ringwald             }
1480901c000fSMatthias Ringwald             break;
14812bacf595SMatthias Ringwald         case SM_SC_W4_CALCULATE_H6_ILK:
14822bacf595SMatthias Ringwald             memcpy(setup->sm_t, hash, 16);
14832bacf595SMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_H6_BR_EDR_LINK_KEY;
14842bacf595SMatthias Ringwald             break;
14852bacf595SMatthias Ringwald         case SM_SC_W4_CALCULATE_H6_BR_EDR_LINK_KEY:
14862bacf595SMatthias Ringwald             reverse_128(hash, setup->sm_t);
14872bacf595SMatthias Ringwald             link_key_type = sm_conn->sm_connection_authenticated ?
14882bacf595SMatthias Ringwald                 AUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256 : UNAUTHENTICATED_COMBINATION_KEY_GENERATED_FROM_P256;
14892bacf595SMatthias Ringwald             if (sm_conn->sm_role){
149035454696SMatthias Ringwald #ifdef ENABLE_CLASSIC
14912bacf595SMatthias Ringwald                 gap_store_link_key_for_bd_addr(setup->sm_m_address, setup->sm_t, link_key_type);
149235454696SMatthias Ringwald #endif
14932bacf595SMatthias Ringwald                 sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
14942bacf595SMatthias Ringwald             } else {
149535454696SMatthias Ringwald #ifdef ENABLE_CLASSIC
14962bacf595SMatthias Ringwald                 gap_store_link_key_for_bd_addr(setup->sm_s_address, setup->sm_t, link_key_type);
149735454696SMatthias Ringwald #endif
14982bacf595SMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
14992bacf595SMatthias Ringwald             }
15002bacf595SMatthias Ringwald             sm_done_for_handle(sm_conn->sm_handle);
15012bacf595SMatthias Ringwald             break;
1502bd57ffebSMatthias Ringwald         default:
1503bd57ffebSMatthias Ringwald             log_error("sm_sc_cmac_done in state %u", sm_conn->sm_engine_state);
1504bd57ffebSMatthias Ringwald             break;
1505bd57ffebSMatthias Ringwald     }
1506aec94140SMatthias Ringwald     sm_run();
1507aec94140SMatthias Ringwald }
1508aec94140SMatthias Ringwald 
1509688a08f9SMatthias 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){
1510dc300847SMatthias Ringwald     const uint16_t message_len = 65;
1511aec94140SMatthias Ringwald     sm_cmac_connection = sm_conn;
1512aec94140SMatthias Ringwald     memcpy(sm_cmac_sc_buffer, u, 32);
1513aec94140SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, v, 32);
1514aec94140SMatthias Ringwald     sm_cmac_sc_buffer[64] = z;
1515aec94140SMatthias Ringwald     log_info("f4 key");
1516aec94140SMatthias Ringwald     log_info_hexdump(x, 16);
1517aec94140SMatthias Ringwald     log_info("f4 message");
1518dc300847SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1519dc300847SMatthias Ringwald     sm_cmac_general_start(x, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1520aec94140SMatthias Ringwald }
1521aec94140SMatthias Ringwald 
15220346c37cSMatthias Ringwald static const sm_key_t f5_salt = { 0x6C ,0x88, 0x83, 0x91, 0xAA, 0xF5, 0xA5, 0x38, 0x60, 0x37, 0x0B, 0xDB, 0x5A, 0x60, 0x83, 0xBE};
15230346c37cSMatthias Ringwald static const uint8_t f5_key_id[] = { 0x62, 0x74, 0x6c, 0x65 };
15240346c37cSMatthias Ringwald static const uint8_t f5_length[] = { 0x01, 0x00};
15250346c37cSMatthias Ringwald 
15260346c37cSMatthias Ringwald static void sm_sc_calculate_dhkey(sm_key256_t dhkey){
15270346c37cSMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
15280346c37cSMatthias Ringwald     // da * Pb
1529e722521aSMatthias Ringwald     mbedtls_mpi d;
15300346c37cSMatthias Ringwald     mbedtls_ecp_point Q;
1531df86eb96SMatthias Ringwald     mbedtls_ecp_point DH;
1532e722521aSMatthias Ringwald     mbedtls_mpi_init(&d);
15330346c37cSMatthias Ringwald     mbedtls_ecp_point_init(&Q);
1534df86eb96SMatthias Ringwald     mbedtls_ecp_point_init(&DH);
1535e722521aSMatthias Ringwald     mbedtls_mpi_read_binary(&d, ec_d, 32);
15360346c37cSMatthias Ringwald     mbedtls_mpi_read_binary(&Q.X, setup->sm_peer_qx, 32);
15370346c37cSMatthias Ringwald     mbedtls_mpi_read_binary(&Q.Y, setup->sm_peer_qy, 32);
1538ae4aa2b6SMatthias Ringwald     mbedtls_mpi_lset(&Q.Z, 1);
1539e722521aSMatthias Ringwald     mbedtls_ecp_mul(&mbedtls_ec_group, &DH, &d, &Q, NULL, NULL);
15400346c37cSMatthias Ringwald     mbedtls_mpi_write_binary(&DH.X, dhkey, 32);
1541ae4aa2b6SMatthias Ringwald     mbedtls_ecp_point_free(&DH);
1542df86eb96SMatthias Ringwald     mbedtls_mpi_free(&d);
1543891bb64aSMatthias Ringwald     mbedtls_ecp_point_free(&Q);
15440346c37cSMatthias Ringwald #endif
15450346c37cSMatthias Ringwald     log_info("dhkey");
15460346c37cSMatthias Ringwald     log_info_hexdump(dhkey, 32);
15470346c37cSMatthias Ringwald }
15480346c37cSMatthias Ringwald 
15490346c37cSMatthias Ringwald static void f5_calculate_salt(sm_connection_t * sm_conn){
15500346c37cSMatthias Ringwald     // calculate DHKEY
15510346c37cSMatthias Ringwald     sm_key256_t dhkey;
15520346c37cSMatthias Ringwald     sm_sc_calculate_dhkey(dhkey);
15530346c37cSMatthias Ringwald 
15540346c37cSMatthias Ringwald     // calculate salt for f5
15550346c37cSMatthias Ringwald     const uint16_t message_len = 32;
15560346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
15570346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer, dhkey, message_len);
15580346c37cSMatthias Ringwald     sm_cmac_general_start(f5_salt, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
15590346c37cSMatthias Ringwald }
15600346c37cSMatthias Ringwald 
15610346c37cSMatthias Ringwald static inline void f5_mackkey(sm_connection_t * sm_conn, sm_key_t t, const sm_key_t n1, const sm_key_t n2, const sm_key56_t a1, const sm_key56_t a2){
15620346c37cSMatthias Ringwald     const uint16_t message_len = 53;
15630346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
15640346c37cSMatthias Ringwald 
15650346c37cSMatthias Ringwald     // f5(W, N1, N2, A1, A2) = AES-CMACT (Counter = 0 || keyID || N1 || N2|| A1|| A2 || Length = 256) -- this is the MacKey
15660346c37cSMatthias Ringwald     sm_cmac_sc_buffer[0] = 0;
15670346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+01, f5_key_id, 4);
15680346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+05, n1, 16);
15690346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+21, n2, 16);
15700346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+37, a1, 7);
15710346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+44, a2, 7);
15720346c37cSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+51, f5_length, 2);
15730346c37cSMatthias Ringwald     log_info("f5 key");
15740346c37cSMatthias Ringwald     log_info_hexdump(t, 16);
15750346c37cSMatthias Ringwald     log_info("f5 message for MacKey");
15760346c37cSMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
15770346c37cSMatthias Ringwald     sm_cmac_general_start(t, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
15780346c37cSMatthias Ringwald }
15790346c37cSMatthias Ringwald 
15800346c37cSMatthias Ringwald static void f5_calculate_mackey(sm_connection_t * sm_conn){
15810346c37cSMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
15820346c37cSMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
15830346c37cSMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
15840346c37cSMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
15850346c37cSMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
15860346c37cSMatthias Ringwald     if (sm_conn->sm_role){
15870346c37cSMatthias Ringwald         // responder
15880346c37cSMatthias Ringwald         f5_mackkey(sm_conn, setup->sm_t, setup->sm_peer_nonce, setup->sm_local_nonce, bd_addr_master, bd_addr_slave);
15890346c37cSMatthias Ringwald     } else {
15900346c37cSMatthias Ringwald         // initiator
15910346c37cSMatthias Ringwald         f5_mackkey(sm_conn, setup->sm_t, setup->sm_local_nonce, setup->sm_peer_nonce, bd_addr_master, bd_addr_slave);
15920346c37cSMatthias Ringwald     }
15930346c37cSMatthias Ringwald }
15940346c37cSMatthias Ringwald 
15950346c37cSMatthias Ringwald // note: must be called right after f5_mackey, as sm_cmac_buffer[1..52] will be reused
15960346c37cSMatthias Ringwald static inline void f5_ltk(sm_connection_t * sm_conn, sm_key_t t){
15970346c37cSMatthias Ringwald     const uint16_t message_len = 53;
15980346c37cSMatthias Ringwald     sm_cmac_connection = sm_conn;
15990346c37cSMatthias Ringwald     sm_cmac_sc_buffer[0] = 1;
16000346c37cSMatthias Ringwald     // 1..52 setup before
16010346c37cSMatthias Ringwald     log_info("f5 key");
16020346c37cSMatthias Ringwald     log_info_hexdump(t, 16);
16030346c37cSMatthias Ringwald     log_info("f5 message for LTK");
16040346c37cSMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
16050346c37cSMatthias Ringwald     sm_cmac_general_start(t, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
16060346c37cSMatthias Ringwald }
1607f92edc8eSMatthias Ringwald 
16080346c37cSMatthias Ringwald static void f5_calculate_ltk(sm_connection_t * sm_conn){
16090346c37cSMatthias Ringwald     f5_ltk(sm_conn, setup->sm_t);
16100346c37cSMatthias Ringwald }
16110346c37cSMatthias Ringwald 
161227163002SMatthias 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){
1613dc300847SMatthias Ringwald     const uint16_t message_len = 65;
161427163002SMatthias Ringwald     sm_cmac_connection = sm_conn;
1615dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer, n1, 16);
1616dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+16, n2, 16);
1617dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, r, 16);
1618dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+48, io_cap, 3);
1619dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+51, a1, 7);
1620dc300847SMatthias Ringwald     memcpy(sm_cmac_sc_buffer+58, a2, 7);
1621dc300847SMatthias Ringwald     log_info("f6 key");
1622dc300847SMatthias Ringwald     log_info_hexdump(w, 16);
1623dc300847SMatthias Ringwald     log_info("f6 message");
1624dc300847SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1625dc300847SMatthias Ringwald     sm_cmac_general_start(w, 65, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1626dc300847SMatthias Ringwald }
1627dc300847SMatthias Ringwald 
1628f92edc8eSMatthias Ringwald // g2(U, V, X, Y) = AES-CMACX(U || V || Y) mod 2^32
1629f92edc8eSMatthias Ringwald // - U is 256 bits
1630f92edc8eSMatthias Ringwald // - V is 256 bits
1631f92edc8eSMatthias Ringwald // - X is 128 bits
1632f92edc8eSMatthias Ringwald // - Y is 128 bits
1633bd57ffebSMatthias Ringwald static void g2_engine(sm_connection_t * sm_conn, const sm_key256_t u, const sm_key256_t v, const sm_key_t x, const sm_key_t y){
1634bd57ffebSMatthias Ringwald     const uint16_t message_len = 80;
1635bd57ffebSMatthias Ringwald     sm_cmac_connection = sm_conn;
1636bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer, u, 32);
1637bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+32, v, 32);
1638bd57ffebSMatthias Ringwald     memcpy(sm_cmac_sc_buffer+64, y, 16);
1639f92edc8eSMatthias Ringwald     log_info("g2 key");
1640f92edc8eSMatthias Ringwald     log_info_hexdump(x, 16);
1641f92edc8eSMatthias Ringwald     log_info("g2 message");
16422bacf595SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
1643bd57ffebSMatthias Ringwald     sm_cmac_general_start(x, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
1644f92edc8eSMatthias Ringwald }
1645f92edc8eSMatthias Ringwald 
1646b35a3de2SMatthias Ringwald static void g2_calculate(sm_connection_t * sm_conn) {
1647f92edc8eSMatthias Ringwald     // calc Va if numeric comparison
1648f92edc8eSMatthias Ringwald     if (sm_conn->sm_role){
1649f92edc8eSMatthias Ringwald         // responder
165005299751SMatthias Ringwald         g2_engine(sm_conn, setup->sm_peer_qx, ec_qx, setup->sm_peer_nonce, setup->sm_local_nonce);;
1651f92edc8eSMatthias Ringwald     } else {
1652f92edc8eSMatthias Ringwald         // initiator
165305299751SMatthias Ringwald         g2_engine(sm_conn, ec_qx, setup->sm_peer_qx, setup->sm_local_nonce, setup->sm_peer_nonce);
1654f92edc8eSMatthias Ringwald     }
1655f92edc8eSMatthias Ringwald }
1656f92edc8eSMatthias Ringwald 
1657945888f5SMatthias Ringwald static void sm_sc_calculate_local_confirm(sm_connection_t * sm_conn){
16589af0f475SMatthias Ringwald     uint8_t z = 0;
16599af0f475SMatthias Ringwald     if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){
16609af0f475SMatthias Ringwald         // some form of passkey
16619af0f475SMatthias Ringwald         uint32_t pk = big_endian_read_32(setup->sm_tk, 12);
16629af0f475SMatthias Ringwald         z = 0x80 | ((pk >> setup->sm_passkey_bit) & 1);
16639af0f475SMatthias Ringwald         setup->sm_passkey_bit++;
16649af0f475SMatthias Ringwald     }
166505299751SMatthias Ringwald     f4_engine(sm_conn, ec_qx, setup->sm_peer_qx, setup->sm_local_nonce, z);
16669af0f475SMatthias Ringwald }
1667688a08f9SMatthias Ringwald 
1668688a08f9SMatthias Ringwald static void sm_sc_calculate_remote_confirm(sm_connection_t * sm_conn){
1669688a08f9SMatthias Ringwald     uint8_t z = 0;
1670688a08f9SMatthias Ringwald     if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT){
1671688a08f9SMatthias Ringwald         // some form of passkey
1672688a08f9SMatthias Ringwald         uint32_t pk = big_endian_read_32(setup->sm_tk, 12);
1673688a08f9SMatthias Ringwald         // sm_passkey_bit was increased before sending confirm value
1674688a08f9SMatthias Ringwald         z = 0x80 | ((pk >> (setup->sm_passkey_bit-1)) & 1);
1675688a08f9SMatthias Ringwald     }
167605299751SMatthias Ringwald     f4_engine(sm_conn, setup->sm_peer_qx, ec_qx, setup->sm_peer_nonce, z);
1677688a08f9SMatthias Ringwald }
1678688a08f9SMatthias Ringwald 
16790346c37cSMatthias Ringwald static void sm_sc_prepare_dhkey_check(sm_connection_t * sm_conn){
16800346c37cSMatthias Ringwald     sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F5_SALT;
1681dc300847SMatthias Ringwald }
1682dc300847SMatthias Ringwald 
1683dc300847SMatthias Ringwald static void sm_sc_calculate_f6_for_dhkey_check(sm_connection_t * sm_conn){
1684dc300847SMatthias Ringwald     // calculate DHKCheck
1685dc300847SMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
1686dc300847SMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
1687dc300847SMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
1688dc300847SMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
1689dc300847SMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
1690dc300847SMatthias Ringwald     uint8_t iocap_a[3];
1691dc300847SMatthias Ringwald     iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq);
1692dc300847SMatthias Ringwald     iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq);
1693dc300847SMatthias Ringwald     iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq);
1694dc300847SMatthias Ringwald     uint8_t iocap_b[3];
1695dc300847SMatthias Ringwald     iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres);
1696dc300847SMatthias Ringwald     iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres);
1697dc300847SMatthias Ringwald     iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres);
1698dc300847SMatthias Ringwald     if (sm_conn->sm_role){
1699dc300847SMatthias Ringwald         // responder
170027163002SMatthias 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);
1701dc300847SMatthias Ringwald     } else {
1702dc300847SMatthias Ringwald         // initiator
170327163002SMatthias 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);
1704dc300847SMatthias Ringwald     }
1705dc300847SMatthias Ringwald }
1706dc300847SMatthias Ringwald 
1707019005a0SMatthias Ringwald static void sm_sc_calculate_f6_to_verify_dhkey_check(sm_connection_t * sm_conn){
1708019005a0SMatthias Ringwald     // validate E = f6()
1709019005a0SMatthias Ringwald     sm_key56_t bd_addr_master, bd_addr_slave;
1710019005a0SMatthias Ringwald     bd_addr_master[0] =  setup->sm_m_addr_type;
1711019005a0SMatthias Ringwald     bd_addr_slave[0]  =  setup->sm_s_addr_type;
1712019005a0SMatthias Ringwald     memcpy(&bd_addr_master[1], setup->sm_m_address, 6);
1713019005a0SMatthias Ringwald     memcpy(&bd_addr_slave[1],  setup->sm_s_address, 6);
1714019005a0SMatthias Ringwald 
1715019005a0SMatthias Ringwald     uint8_t iocap_a[3];
1716019005a0SMatthias Ringwald     iocap_a[0] = sm_pairing_packet_get_auth_req(setup->sm_m_preq);
1717019005a0SMatthias Ringwald     iocap_a[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_m_preq);
1718019005a0SMatthias Ringwald     iocap_a[2] = sm_pairing_packet_get_io_capability(setup->sm_m_preq);
1719019005a0SMatthias Ringwald     uint8_t iocap_b[3];
1720019005a0SMatthias Ringwald     iocap_b[0] = sm_pairing_packet_get_auth_req(setup->sm_s_pres);
1721019005a0SMatthias Ringwald     iocap_b[1] = sm_pairing_packet_get_oob_data_flag(setup->sm_s_pres);
1722019005a0SMatthias Ringwald     iocap_b[2] = sm_pairing_packet_get_io_capability(setup->sm_s_pres);
1723019005a0SMatthias Ringwald     if (sm_conn->sm_role){
1724019005a0SMatthias Ringwald         // responder
1725019005a0SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_rb, iocap_a, bd_addr_master, bd_addr_slave);
1726019005a0SMatthias Ringwald     } else {
1727019005a0SMatthias Ringwald         // initiator
1728019005a0SMatthias Ringwald         f6_engine(sm_conn, setup->sm_mackey, setup->sm_peer_nonce, setup->sm_local_nonce, setup->sm_ra, iocap_b, bd_addr_slave, bd_addr_master);
1729019005a0SMatthias Ringwald     }
1730019005a0SMatthias Ringwald }
17312bacf595SMatthias Ringwald 
17322bacf595SMatthias Ringwald 
17332bacf595SMatthias Ringwald //
17342bacf595SMatthias Ringwald // Link Key Conversion Function h6
17352bacf595SMatthias Ringwald //
17362bacf595SMatthias Ringwald // h6(W, keyID) = AES-CMACW(keyID)
17372bacf595SMatthias Ringwald // - W is 128 bits
17382bacf595SMatthias Ringwald // - keyID is 32 bits
17392bacf595SMatthias Ringwald static void h6_engine(sm_connection_t * sm_conn, const sm_key_t w, const uint32_t key_id){
17402bacf595SMatthias Ringwald     const uint16_t message_len = 4;
17412bacf595SMatthias Ringwald     sm_cmac_connection = sm_conn;
17422bacf595SMatthias Ringwald     big_endian_store_32(sm_cmac_sc_buffer, 0, key_id);
17432bacf595SMatthias Ringwald     log_info("h6 key");
17442bacf595SMatthias Ringwald     log_info_hexdump(w, 16);
17452bacf595SMatthias Ringwald     log_info("h6 message");
17462bacf595SMatthias Ringwald     log_info_hexdump(sm_cmac_sc_buffer, message_len);
17472bacf595SMatthias Ringwald     sm_cmac_general_start(w, message_len, &sm_sc_cmac_get_byte, &sm_sc_cmac_done);
17482bacf595SMatthias Ringwald }
17492bacf595SMatthias Ringwald 
1750b18300a6SMatthias Ringwald // For SC, setup->sm_local_ltk holds full LTK (sm_ltk is already truncated)
1751b18300a6SMatthias Ringwald // Errata Service Release to the Bluetooth Specification: ESR09
1752b18300a6SMatthias Ringwald //   E6405 – Cross transport key derivation from a key of size less than 128 bits
1753b18300a6SMatthias Ringwald //   "Note: When the BR/EDR link key is being derived from the LTK, the derivation is done before the LTK gets masked."
17542bacf595SMatthias Ringwald static void h6_calculate_ilk(sm_connection_t * sm_conn){
1755b18300a6SMatthias Ringwald     h6_engine(sm_conn, setup->sm_local_ltk, 0x746D7031);    // "tmp1"
17562bacf595SMatthias Ringwald }
17572bacf595SMatthias Ringwald 
17582bacf595SMatthias Ringwald static void h6_calculate_br_edr_link_key(sm_connection_t * sm_conn){
17592bacf595SMatthias Ringwald     h6_engine(sm_conn, setup->sm_t, 0x6c656272);    // "lebr"
17602bacf595SMatthias Ringwald }
17612bacf595SMatthias Ringwald 
17629af0f475SMatthias Ringwald #endif
17639af0f475SMatthias Ringwald 
1764613da3deSMatthias Ringwald // key management legacy connections:
1765613da3deSMatthias Ringwald // - potentially two different LTKs based on direction. each device stores LTK provided by peer
1766613da3deSMatthias Ringwald // - master stores LTK, EDIV, RAND. responder optionally stored master LTK (only if it needs to reconnect)
1767613da3deSMatthias Ringwald // - initiators reconnects: initiator uses stored LTK, EDIV, RAND generated by responder
1768613da3deSMatthias Ringwald // - responder  reconnects: responder uses LTK receveived from master
1769613da3deSMatthias Ringwald 
1770613da3deSMatthias Ringwald // key management secure connections:
1771613da3deSMatthias Ringwald // - both devices store same LTK from ECDH key exchange.
1772613da3deSMatthias Ringwald 
17735829ebe2SMatthias Ringwald static void sm_load_security_info(sm_connection_t * sm_connection){
17745829ebe2SMatthias Ringwald     int encryption_key_size;
17755829ebe2SMatthias Ringwald     int authenticated;
17765829ebe2SMatthias Ringwald     int authorized;
17775829ebe2SMatthias Ringwald 
17785829ebe2SMatthias Ringwald     // fetch data from device db - incl. authenticated/authorized/key size. Note all sm_connection_X require encryption enabled
17795829ebe2SMatthias Ringwald     le_device_db_encryption_get(sm_connection->sm_le_db_index, &setup->sm_peer_ediv, setup->sm_peer_rand, setup->sm_peer_ltk,
17805829ebe2SMatthias Ringwald                                 &encryption_key_size, &authenticated, &authorized);
17815829ebe2SMatthias Ringwald     log_info("db index %u, key size %u, authenticated %u, authorized %u", sm_connection->sm_le_db_index, encryption_key_size, authenticated, authorized);
17825829ebe2SMatthias Ringwald     sm_connection->sm_actual_encryption_key_size = encryption_key_size;
17835829ebe2SMatthias Ringwald     sm_connection->sm_connection_authenticated = authenticated;
17845829ebe2SMatthias Ringwald     sm_connection->sm_connection_authorization_state = authorized ? AUTHORIZATION_GRANTED : AUTHORIZATION_UNKNOWN;
17855829ebe2SMatthias Ringwald }
1786bd57ffebSMatthias Ringwald 
178759066796SMatthias Ringwald static void sm_start_calculating_ltk_from_ediv_and_rand(sm_connection_t * sm_connection){
178859066796SMatthias Ringwald     memcpy(setup->sm_local_rand, sm_connection->sm_local_rand, 8);
178959066796SMatthias Ringwald     setup->sm_local_ediv = sm_connection->sm_local_ediv;
179059066796SMatthias Ringwald     // re-establish used key encryption size
179159066796SMatthias Ringwald     // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand
179259066796SMatthias Ringwald     sm_connection->sm_actual_encryption_key_size = (setup->sm_local_rand[7] & 0x0f) + 1;
179359066796SMatthias Ringwald     // no db for authenticated flag hack: flag is stored in bit 4 of LSB
179459066796SMatthias Ringwald     sm_connection->sm_connection_authenticated = (setup->sm_local_rand[7] & 0x10) >> 4;
179559066796SMatthias Ringwald     log_info("sm: received ltk request with key size %u, authenticated %u",
179659066796SMatthias Ringwald             sm_connection->sm_actual_encryption_key_size, sm_connection->sm_connection_authenticated);
179759066796SMatthias Ringwald     sm_connection->sm_engine_state = SM_RESPONDER_PH4_Y_GET_ENC;
179859066796SMatthias Ringwald }
179959066796SMatthias Ringwald 
18003deb3ec6SMatthias Ringwald static void sm_run(void){
18013deb3ec6SMatthias Ringwald 
1802665d90f2SMatthias Ringwald     btstack_linked_list_iterator_t it;
18033deb3ec6SMatthias Ringwald 
18043deb3ec6SMatthias Ringwald     // assert that we can send at least commands
18053deb3ec6SMatthias Ringwald     if (!hci_can_send_command_packet_now()) return;
18063deb3ec6SMatthias Ringwald 
18073deb3ec6SMatthias Ringwald     //
18083deb3ec6SMatthias Ringwald     // non-connection related behaviour
18093deb3ec6SMatthias Ringwald     //
18103deb3ec6SMatthias Ringwald 
18113deb3ec6SMatthias Ringwald     // distributed key generation
18123deb3ec6SMatthias Ringwald     switch (dkg_state){
18133deb3ec6SMatthias Ringwald         case DKG_CALC_IRK:
18143deb3ec6SMatthias Ringwald             // already busy?
18153deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18163deb3ec6SMatthias Ringwald                 // IRK = d1(IR, 1, 0)
18173deb3ec6SMatthias Ringwald                 sm_key_t d1_prime;
18183deb3ec6SMatthias Ringwald                 sm_d1_d_prime(1, 0, d1_prime);  // plaintext
18193deb3ec6SMatthias Ringwald                 dkg_next_state();
18203deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_ir, d1_prime, NULL);
18213deb3ec6SMatthias Ringwald                 return;
18223deb3ec6SMatthias Ringwald             }
18233deb3ec6SMatthias Ringwald             break;
18243deb3ec6SMatthias Ringwald         case DKG_CALC_DHK:
18253deb3ec6SMatthias Ringwald             // already busy?
18263deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18273deb3ec6SMatthias Ringwald                 // DHK = d1(IR, 3, 0)
18283deb3ec6SMatthias Ringwald                 sm_key_t d1_prime;
18293deb3ec6SMatthias Ringwald                 sm_d1_d_prime(3, 0, d1_prime);  // plaintext
18303deb3ec6SMatthias Ringwald                 dkg_next_state();
18313deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_ir, d1_prime, NULL);
18323deb3ec6SMatthias Ringwald                 return;
18333deb3ec6SMatthias Ringwald             }
18343deb3ec6SMatthias Ringwald             break;
18353deb3ec6SMatthias Ringwald         default:
18363deb3ec6SMatthias Ringwald             break;
18373deb3ec6SMatthias Ringwald     }
18383deb3ec6SMatthias Ringwald 
183909e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
18407df18c15SMatthias Ringwald     if (ec_key_generation_state == EC_KEY_GENERATION_ACTIVE){
184109e4d397SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
18427df18c15SMatthias Ringwald         sm_random_start(NULL);
184309e4d397SMatthias Ringwald #else
184409e4d397SMatthias Ringwald         ec_key_generation_state = EC_KEY_GENERATION_W4_KEY;
184509e4d397SMatthias Ringwald         hci_send_cmd(&hci_le_read_local_p256_public_key);
184609e4d397SMatthias Ringwald #endif
18477df18c15SMatthias Ringwald         return;
18487df18c15SMatthias Ringwald     }
18497df18c15SMatthias Ringwald #endif
18507df18c15SMatthias Ringwald 
18513deb3ec6SMatthias Ringwald     // random address updates
18523deb3ec6SMatthias Ringwald     switch (rau_state){
18533deb3ec6SMatthias Ringwald         case RAU_GET_RANDOM:
18543deb3ec6SMatthias Ringwald             rau_next_state();
18553deb3ec6SMatthias Ringwald             sm_random_start(NULL);
18563deb3ec6SMatthias Ringwald             return;
18573deb3ec6SMatthias Ringwald         case RAU_GET_ENC:
18583deb3ec6SMatthias Ringwald             // already busy?
18593deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_IDLE) {
18603deb3ec6SMatthias Ringwald                 sm_key_t r_prime;
18613deb3ec6SMatthias Ringwald                 sm_ah_r_prime(sm_random_address, r_prime);
18623deb3ec6SMatthias Ringwald                 rau_next_state();
18633deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_irk, r_prime, NULL);
18643deb3ec6SMatthias Ringwald                 return;
18653deb3ec6SMatthias Ringwald             }
18663deb3ec6SMatthias Ringwald             break;
18673deb3ec6SMatthias Ringwald         case RAU_SET_ADDRESS:
18683deb3ec6SMatthias Ringwald             log_info("New random address: %s", bd_addr_to_str(sm_random_address));
18693deb3ec6SMatthias Ringwald             rau_state = RAU_IDLE;
18703deb3ec6SMatthias Ringwald             hci_send_cmd(&hci_le_set_random_address, sm_random_address);
18713deb3ec6SMatthias Ringwald             return;
18723deb3ec6SMatthias Ringwald         default:
18733deb3ec6SMatthias Ringwald             break;
18743deb3ec6SMatthias Ringwald     }
18753deb3ec6SMatthias Ringwald 
18767a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
18773deb3ec6SMatthias Ringwald     // CMAC
18783deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
18793deb3ec6SMatthias Ringwald         case CMAC_CALC_SUBKEYS:
18803deb3ec6SMatthias Ringwald         case CMAC_CALC_MI:
18813deb3ec6SMatthias Ringwald         case CMAC_CALC_MLAST:
18823deb3ec6SMatthias Ringwald             // already busy?
18833deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_ACTIVE) break;
18843deb3ec6SMatthias Ringwald             sm_cmac_handle_aes_engine_ready();
18853deb3ec6SMatthias Ringwald             return;
18863deb3ec6SMatthias Ringwald         default:
18873deb3ec6SMatthias Ringwald             break;
18883deb3ec6SMatthias Ringwald     }
18897a766ebfSMatthias Ringwald #endif
18903deb3ec6SMatthias Ringwald 
18913deb3ec6SMatthias Ringwald     // CSRK Lookup
18923deb3ec6SMatthias Ringwald     // -- if csrk lookup ready, find connection that require csrk lookup
18933deb3ec6SMatthias Ringwald     if (sm_address_resolution_idle()){
18943deb3ec6SMatthias Ringwald         hci_connections_get_iterator(&it);
1895665d90f2SMatthias Ringwald         while(btstack_linked_list_iterator_has_next(&it)){
1896665d90f2SMatthias Ringwald             hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
18973deb3ec6SMatthias Ringwald             sm_connection_t  * sm_connection  = &hci_connection->sm_connection;
18983deb3ec6SMatthias Ringwald             if (sm_connection->sm_irk_lookup_state == IRK_LOOKUP_W4_READY){
18993deb3ec6SMatthias Ringwald                 // and start lookup
19003deb3ec6SMatthias 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);
19013deb3ec6SMatthias Ringwald                 sm_connection->sm_irk_lookup_state = IRK_LOOKUP_STARTED;
19023deb3ec6SMatthias Ringwald                 break;
19033deb3ec6SMatthias Ringwald             }
19043deb3ec6SMatthias Ringwald         }
19053deb3ec6SMatthias Ringwald     }
19063deb3ec6SMatthias Ringwald 
19073deb3ec6SMatthias Ringwald     // -- if csrk lookup ready, resolved addresses for received addresses
19083deb3ec6SMatthias Ringwald     if (sm_address_resolution_idle()) {
1909665d90f2SMatthias Ringwald         if (!btstack_linked_list_empty(&sm_address_resolution_general_queue)){
19103deb3ec6SMatthias Ringwald             sm_lookup_entry_t * entry = (sm_lookup_entry_t *) sm_address_resolution_general_queue;
1911665d90f2SMatthias Ringwald             btstack_linked_list_remove(&sm_address_resolution_general_queue, (btstack_linked_item_t *) entry);
19123deb3ec6SMatthias Ringwald             sm_address_resolution_start_lookup(entry->address_type, 0, entry->address, ADDRESS_RESOLUTION_GENERAL, NULL);
19133deb3ec6SMatthias Ringwald             btstack_memory_sm_lookup_entry_free(entry);
19143deb3ec6SMatthias Ringwald         }
19153deb3ec6SMatthias Ringwald     }
19163deb3ec6SMatthias Ringwald 
19173deb3ec6SMatthias Ringwald     // -- Continue with CSRK device lookup by public or resolvable private address
19183deb3ec6SMatthias Ringwald     if (!sm_address_resolution_idle()){
19193deb3ec6SMatthias Ringwald         log_info("LE Device Lookup: device %u/%u", sm_address_resolution_test, le_device_db_count());
19203deb3ec6SMatthias Ringwald         while (sm_address_resolution_test < le_device_db_count()){
19213deb3ec6SMatthias Ringwald             int addr_type;
19223deb3ec6SMatthias Ringwald             bd_addr_t addr;
19233deb3ec6SMatthias Ringwald             sm_key_t irk;
19243deb3ec6SMatthias Ringwald             le_device_db_info(sm_address_resolution_test, &addr_type, addr, irk);
19253deb3ec6SMatthias Ringwald             log_info("device type %u, addr: %s", addr_type, bd_addr_to_str(addr));
19263deb3ec6SMatthias Ringwald 
19273deb3ec6SMatthias Ringwald             if (sm_address_resolution_addr_type == addr_type && memcmp(addr, sm_address_resolution_address, 6) == 0){
19283deb3ec6SMatthias Ringwald                 log_info("LE Device Lookup: found CSRK by { addr_type, address} ");
19293deb3ec6SMatthias Ringwald                 sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED);
19303deb3ec6SMatthias Ringwald                 break;
19313deb3ec6SMatthias Ringwald             }
19323deb3ec6SMatthias Ringwald 
19333deb3ec6SMatthias Ringwald             if (sm_address_resolution_addr_type == 0){
19343deb3ec6SMatthias Ringwald                 sm_address_resolution_test++;
19353deb3ec6SMatthias Ringwald                 continue;
19363deb3ec6SMatthias Ringwald             }
19373deb3ec6SMatthias Ringwald 
19383deb3ec6SMatthias Ringwald             if (sm_aes128_state == SM_AES128_ACTIVE) break;
19393deb3ec6SMatthias Ringwald 
19403deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: calculate AH");
19418314c363SMatthias Ringwald             log_info_key("IRK", irk);
19423deb3ec6SMatthias Ringwald 
19433deb3ec6SMatthias Ringwald             sm_key_t r_prime;
19443deb3ec6SMatthias Ringwald             sm_ah_r_prime(sm_address_resolution_address, r_prime);
19453deb3ec6SMatthias Ringwald             sm_address_resolution_ah_calculation_active = 1;
19463deb3ec6SMatthias Ringwald             sm_aes128_start(irk, r_prime, sm_address_resolution_context);   // keep context
19473deb3ec6SMatthias Ringwald             return;
19483deb3ec6SMatthias Ringwald         }
19493deb3ec6SMatthias Ringwald 
19503deb3ec6SMatthias Ringwald         if (sm_address_resolution_test >= le_device_db_count()){
19513deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: not found");
19523deb3ec6SMatthias Ringwald             sm_address_resolution_handle_event(ADDRESS_RESOLUTION_FAILED);
19533deb3ec6SMatthias Ringwald         }
19543deb3ec6SMatthias Ringwald     }
19553deb3ec6SMatthias Ringwald 
195641d32297SMatthias Ringwald     // handle basic actions that don't requires the full context
195741d32297SMatthias Ringwald     hci_connections_get_iterator(&it);
195841d32297SMatthias Ringwald     while(!sm_active_connection && btstack_linked_list_iterator_has_next(&it)){
195941d32297SMatthias Ringwald         hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
196041d32297SMatthias Ringwald         sm_connection_t  * sm_connection = &hci_connection->sm_connection;
196141d32297SMatthias Ringwald         switch(sm_connection->sm_engine_state){
196241d32297SMatthias Ringwald             // responder side
196341d32297SMatthias Ringwald             case SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY:
196441d32297SMatthias Ringwald                 sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
196541d32297SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
196641d32297SMatthias Ringwald                 return;
19674b8b5afeSMatthias Ringwald 
19684b8b5afeSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
19694b8b5afeSMatthias Ringwald             case SM_SC_RECEIVED_LTK_REQUEST:
19704b8b5afeSMatthias Ringwald                 switch (sm_connection->sm_irk_lookup_state){
19714b8b5afeSMatthias Ringwald                     case IRK_LOOKUP_FAILED:
19724b8b5afeSMatthias Ringwald                         log_info("LTK Request: ediv & random are empty, but no stored LTK (IRK Lookup Failed)");
19734b8b5afeSMatthias Ringwald                         sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
19744b8b5afeSMatthias Ringwald                         hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
19754b8b5afeSMatthias Ringwald                         return;
19764b8b5afeSMatthias Ringwald                     default:
19774b8b5afeSMatthias Ringwald                         break;
19784b8b5afeSMatthias Ringwald                 }
19794b8b5afeSMatthias Ringwald                 break;
19804b8b5afeSMatthias Ringwald #endif
198141d32297SMatthias Ringwald             default:
198241d32297SMatthias Ringwald                 break;
198341d32297SMatthias Ringwald         }
198441d32297SMatthias Ringwald     }
19853deb3ec6SMatthias Ringwald 
19863deb3ec6SMatthias Ringwald     //
19873deb3ec6SMatthias Ringwald     // active connection handling
19883deb3ec6SMatthias Ringwald     // -- use loop to handle next connection if lock on setup context is released
19893deb3ec6SMatthias Ringwald 
19903deb3ec6SMatthias Ringwald     while (1) {
19913deb3ec6SMatthias Ringwald 
19923deb3ec6SMatthias Ringwald         // Find connections that requires setup context and make active if no other is locked
19933deb3ec6SMatthias Ringwald         hci_connections_get_iterator(&it);
1994665d90f2SMatthias Ringwald         while(!sm_active_connection && btstack_linked_list_iterator_has_next(&it)){
1995665d90f2SMatthias Ringwald             hci_connection_t * hci_connection = (hci_connection_t *) btstack_linked_list_iterator_next(&it);
19963deb3ec6SMatthias Ringwald             sm_connection_t  * sm_connection = &hci_connection->sm_connection;
19973deb3ec6SMatthias Ringwald             // - if no connection locked and we're ready/waiting for setup context, fetch it and start
19983deb3ec6SMatthias Ringwald             int done = 1;
19993deb3ec6SMatthias Ringwald             int err;
20003deb3ec6SMatthias Ringwald             switch (sm_connection->sm_engine_state) {
20013deb3ec6SMatthias Ringwald                 case SM_RESPONDER_SEND_SECURITY_REQUEST:
20023deb3ec6SMatthias Ringwald                     // send packet if possible,
2003adbe29e8SMatthias Ringwald                     if (l2cap_can_send_fixed_channel_packet_now(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)){
2004b170b20fSMatthias Ringwald                         const uint8_t buffer[2] = { SM_CODE_SECURITY_REQUEST, SM_AUTHREQ_BONDING};
20053deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_REQUEST;
20063deb3ec6SMatthias Ringwald                         l2cap_send_connectionless(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2007b170b20fSMatthias Ringwald                     } else {
2008b170b20fSMatthias Ringwald                         l2cap_request_can_send_fix_channel_now_event(sm_connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
20093deb3ec6SMatthias Ringwald                     }
20105829ebe2SMatthias Ringwald                     // don't lock sxetup context yet
20113deb3ec6SMatthias Ringwald                     done = 0;
20123deb3ec6SMatthias Ringwald                     break;
20133deb3ec6SMatthias Ringwald                 case SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED:
2014d7471931SMatthias Ringwald                     sm_reset_setup();
20153deb3ec6SMatthias Ringwald                     sm_init_setup(sm_connection);
20163deb3ec6SMatthias Ringwald                     // recover pairing request
20173deb3ec6SMatthias Ringwald                     memcpy(&setup->sm_m_preq, &sm_connection->sm_m_preq, sizeof(sm_pairing_packet_t));
20183deb3ec6SMatthias Ringwald                     err = sm_stk_generation_init(sm_connection);
20193deb3ec6SMatthias Ringwald                     if (err){
20203deb3ec6SMatthias Ringwald                         setup->sm_pairing_failed_reason = err;
20213deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
20223deb3ec6SMatthias Ringwald                         break;
20233deb3ec6SMatthias Ringwald                     }
20243deb3ec6SMatthias Ringwald                     sm_timeout_start(sm_connection);
20253deb3ec6SMatthias Ringwald                     // generate random number first, if we need to show passkey
20263deb3ec6SMatthias Ringwald                     if (setup->sm_stk_generation_method == PK_INIT_INPUT){
20273deb3ec6SMatthias Ringwald                         sm_connection->sm_engine_state = SM_PH2_GET_RANDOM_TK;
20283deb3ec6SMatthias Ringwald                         break;
20293deb3ec6SMatthias Ringwald                     }
20303deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE;
20313deb3ec6SMatthias Ringwald                     break;
20323deb3ec6SMatthias Ringwald                 case SM_INITIATOR_PH0_HAS_LTK:
2033d7471931SMatthias Ringwald                     sm_reset_setup();
20345829ebe2SMatthias Ringwald                     sm_load_security_info(sm_connection);
20353deb3ec6SMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH0_SEND_START_ENCRYPTION;
20363deb3ec6SMatthias Ringwald                     break;
203759066796SMatthias Ringwald                 case SM_RESPONDER_PH0_RECEIVED_LTK_REQUEST:
203806cd539fSMatthias Ringwald                     sm_reset_setup();
203906cd539fSMatthias Ringwald                     sm_start_calculating_ltk_from_ediv_and_rand(sm_connection);
204006cd539fSMatthias Ringwald                     break;
204106cd539fSMatthias Ringwald                 case SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST:
204206cd539fSMatthias Ringwald                     sm_reset_setup();
204306cd539fSMatthias Ringwald                     sm_init_setup(sm_connection);
204406cd539fSMatthias Ringwald                     sm_timeout_start(sm_connection);
204506cd539fSMatthias Ringwald                     sm_connection->sm_engine_state = SM_INITIATOR_PH1_SEND_PAIRING_REQUEST;
204606cd539fSMatthias Ringwald                     break;
204706cd539fSMatthias Ringwald 
2048549ad5d2SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
204906cd539fSMatthias Ringwald                 case SM_SC_RECEIVED_LTK_REQUEST:
20505829ebe2SMatthias Ringwald                     switch (sm_connection->sm_irk_lookup_state){
2051549ad5d2SMatthias Ringwald                         case IRK_LOOKUP_SUCCEEDED:
2052549ad5d2SMatthias Ringwald                             // assuming Secure Connection, we have a stored LTK and the EDIV/RAND are null
205341d32297SMatthias Ringwald                             // start using context by loading security info
2054d7471931SMatthias Ringwald                             sm_reset_setup();
20555829ebe2SMatthias Ringwald                             sm_load_security_info(sm_connection);
2056549ad5d2SMatthias Ringwald                             if (setup->sm_peer_ediv == 0 && sm_is_null_random(setup->sm_peer_rand) && !sm_is_null_key(setup->sm_peer_ltk)){
2057d7471931SMatthias Ringwald                                 memcpy(setup->sm_ltk, setup->sm_peer_ltk, 16);
2058d7471931SMatthias Ringwald                                 sm_connection->sm_engine_state = SM_RESPONDER_PH4_SEND_LTK_REPLY;
20595829ebe2SMatthias Ringwald                                 break;
20605829ebe2SMatthias Ringwald                             }
2061549ad5d2SMatthias Ringwald                             log_info("LTK Request: ediv & random are empty, but no stored LTK (IRK Lookup Succeeded)");
20624b8b5afeSMatthias Ringwald                             sm_connection->sm_engine_state = SM_RESPONDER_IDLE;
20634b8b5afeSMatthias Ringwald                             hci_send_cmd(&hci_le_long_term_key_negative_reply, sm_connection->sm_handle);
20644b8b5afeSMatthias Ringwald                             // don't lock setup context yet
20654b8b5afeSMatthias Ringwald                             return;
20665829ebe2SMatthias Ringwald                         default:
20675829ebe2SMatthias Ringwald                             // just wait until IRK lookup is completed
206859066796SMatthias Ringwald                             // don't lock setup context yet
20695829ebe2SMatthias Ringwald                             done = 0;
20705829ebe2SMatthias Ringwald                             break;
20715829ebe2SMatthias Ringwald                     }
207206cd539fSMatthias Ringwald                     break;
2073549ad5d2SMatthias Ringwald #endif
20743deb3ec6SMatthias Ringwald                 default:
20753deb3ec6SMatthias Ringwald                     done = 0;
20763deb3ec6SMatthias Ringwald                     break;
20773deb3ec6SMatthias Ringwald             }
20783deb3ec6SMatthias Ringwald             if (done){
20793deb3ec6SMatthias Ringwald                 sm_active_connection = sm_connection->sm_handle;
20803deb3ec6SMatthias Ringwald                 log_info("sm: connection 0x%04x locked setup context as %s", sm_active_connection, sm_connection->sm_role ? "responder" : "initiator");
20813deb3ec6SMatthias Ringwald             }
20823deb3ec6SMatthias Ringwald         }
20833deb3ec6SMatthias Ringwald 
20843deb3ec6SMatthias Ringwald         //
20853deb3ec6SMatthias Ringwald         // active connection handling
20863deb3ec6SMatthias Ringwald         //
20873deb3ec6SMatthias Ringwald 
20883deb3ec6SMatthias Ringwald         if (sm_active_connection == 0) return;
20893deb3ec6SMatthias Ringwald 
20903deb3ec6SMatthias Ringwald         // assert that we could send a SM PDU - not needed for all of the following
2091b170b20fSMatthias Ringwald         if (!l2cap_can_send_fixed_channel_packet_now(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL)) {
2092b170b20fSMatthias Ringwald             l2cap_request_can_send_fix_channel_now_event(sm_active_connection, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
2093b170b20fSMatthias Ringwald             return;
2094b170b20fSMatthias Ringwald         }
20953deb3ec6SMatthias Ringwald 
20963deb3ec6SMatthias Ringwald         sm_connection_t * connection = sm_get_connection_for_handle(sm_active_connection);
20973deb3ec6SMatthias Ringwald         if (!connection) return;
20983deb3ec6SMatthias Ringwald 
20993d7fe1e9SMatthias Ringwald         // send keypress notifications
21003d7fe1e9SMatthias Ringwald         if (setup->sm_keypress_notification != 0xff){
21013d7fe1e9SMatthias Ringwald             uint8_t buffer[2];
21023d7fe1e9SMatthias Ringwald             buffer[0] = SM_CODE_KEYPRESS_NOTIFICATION;
21033d7fe1e9SMatthias Ringwald             buffer[1] = setup->sm_keypress_notification;
21043d7fe1e9SMatthias Ringwald             setup->sm_keypress_notification = 0xff;
21053d7fe1e9SMatthias Ringwald             l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2106d7471931SMatthias Ringwald             return;
21073d7fe1e9SMatthias Ringwald         }
21083d7fe1e9SMatthias Ringwald 
21093deb3ec6SMatthias Ringwald         sm_key_t plaintext;
21103deb3ec6SMatthias Ringwald         int key_distribution_flags;
21113deb3ec6SMatthias Ringwald 
21123deb3ec6SMatthias Ringwald         log_info("sm_run: state %u", connection->sm_engine_state);
21133deb3ec6SMatthias Ringwald 
21143deb3ec6SMatthias Ringwald         switch (connection->sm_engine_state){
21153deb3ec6SMatthias Ringwald 
21163deb3ec6SMatthias Ringwald             // general
21173deb3ec6SMatthias Ringwald             case SM_GENERAL_SEND_PAIRING_FAILED: {
21183deb3ec6SMatthias Ringwald                 uint8_t buffer[2];
21193deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_FAILED;
21203deb3ec6SMatthias Ringwald                 buffer[1] = setup->sm_pairing_failed_reason;
21213deb3ec6SMatthias Ringwald                 connection->sm_engine_state = connection->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED;
21223deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
21233deb3ec6SMatthias Ringwald                 sm_done_for_handle(connection->sm_handle);
21243deb3ec6SMatthias Ringwald                 break;
21253deb3ec6SMatthias Ringwald             }
21263deb3ec6SMatthias Ringwald 
212741d32297SMatthias Ringwald             // responding state
2128aec94140SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2129f1c1783eSMatthias Ringwald             case SM_SC_W2_GET_RANDOM_A:
2130f1c1783eSMatthias Ringwald                 sm_random_start(connection);
2131f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_GET_RANDOM_A;
2132f1c1783eSMatthias Ringwald                 break;
2133f1c1783eSMatthias Ringwald             case SM_SC_W2_GET_RANDOM_B:
2134f1c1783eSMatthias Ringwald                 sm_random_start(connection);
2135f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_GET_RANDOM_B;
2136f1c1783eSMatthias Ringwald                 break;
2137aec94140SMatthias Ringwald             case SM_SC_W2_CMAC_FOR_CONFIRMATION:
2138aec94140SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2139aec94140SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CONFIRMATION;
2140aec94140SMatthias Ringwald                 sm_sc_calculate_local_confirm(connection);
2141aec94140SMatthias Ringwald                 break;
2142688a08f9SMatthias Ringwald             case SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION:
2143688a08f9SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2144688a08f9SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CMAC_FOR_CHECK_CONFIRMATION;
2145688a08f9SMatthias Ringwald                 sm_sc_calculate_remote_confirm(connection);
2146688a08f9SMatthias Ringwald                 break;
2147dc300847SMatthias Ringwald             case SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK:
2148dc300847SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2149dc300847SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK;
2150dc300847SMatthias Ringwald                 sm_sc_calculate_f6_for_dhkey_check(connection);
2151dc300847SMatthias Ringwald                 break;
2152019005a0SMatthias Ringwald             case SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK:
2153b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2154019005a0SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
21550346c37cSMatthias Ringwald                 sm_sc_calculate_f6_to_verify_dhkey_check(connection);
21560346c37cSMatthias Ringwald                 break;
21570346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_SALT:
2158b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
21590346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_SALT;
21600346c37cSMatthias Ringwald                 f5_calculate_salt(connection);
21610346c37cSMatthias Ringwald                 break;
21620346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_MACKEY:
2163b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
21640346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_MACKEY;
21650346c37cSMatthias Ringwald                 f5_calculate_mackey(connection);
21660346c37cSMatthias Ringwald                 break;
21670346c37cSMatthias Ringwald             case SM_SC_W2_CALCULATE_F5_LTK:
2168b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
21690346c37cSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_F5_LTK;
21700346c37cSMatthias Ringwald                 f5_calculate_ltk(connection);
2171019005a0SMatthias Ringwald                 break;
2172bd57ffebSMatthias Ringwald             case SM_SC_W2_CALCULATE_G2:
2173b35a3de2SMatthias Ringwald                 if (!sm_cmac_ready()) break;
2174bd57ffebSMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_G2;
2175b35a3de2SMatthias Ringwald                 g2_calculate(connection);
2176bd57ffebSMatthias Ringwald                 break;
21772bacf595SMatthias Ringwald             case SM_SC_W2_CALCULATE_H6_ILK:
21782bacf595SMatthias Ringwald                 if (!sm_cmac_ready()) break;
21792bacf595SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_H6_ILK;
21802bacf595SMatthias Ringwald                 h6_calculate_ilk(connection);
21812bacf595SMatthias Ringwald                 break;
21822bacf595SMatthias Ringwald             case SM_SC_W2_CALCULATE_H6_BR_EDR_LINK_KEY:
21832bacf595SMatthias Ringwald                 if (!sm_cmac_ready()) break;
21842bacf595SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W4_CALCULATE_H6_BR_EDR_LINK_KEY;
21852bacf595SMatthias Ringwald                 h6_calculate_br_edr_link_key(connection);
21862bacf595SMatthias Ringwald                 break;
2187aec94140SMatthias Ringwald #endif
218841d32297SMatthias Ringwald 
21893deb3ec6SMatthias Ringwald             // initiator side
21903deb3ec6SMatthias Ringwald             case SM_INITIATOR_PH0_SEND_START_ENCRYPTION: {
21913deb3ec6SMatthias Ringwald                 sm_key_t peer_ltk_flipped;
21929c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_peer_ltk, peer_ltk_flipped);
21933deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED;
21943deb3ec6SMatthias Ringwald                 log_info("sm: hci_le_start_encryption ediv 0x%04x", setup->sm_peer_ediv);
2195c9b8fdd9SMatthias Ringwald                 uint32_t rand_high = big_endian_read_32(setup->sm_peer_rand, 0);
2196c9b8fdd9SMatthias Ringwald                 uint32_t rand_low  = big_endian_read_32(setup->sm_peer_rand, 4);
21973deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_start_encryption, connection->sm_handle,rand_low, rand_high, setup->sm_peer_ediv, peer_ltk_flipped);
21983deb3ec6SMatthias Ringwald                 return;
21993deb3ec6SMatthias Ringwald             }
22003deb3ec6SMatthias Ringwald 
22013deb3ec6SMatthias Ringwald             case SM_INITIATOR_PH1_SEND_PAIRING_REQUEST:
22021ad129beSMatthias Ringwald                 sm_pairing_packet_set_code(setup->sm_m_preq, SM_CODE_PAIRING_REQUEST);
22033deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH1_W4_PAIRING_RESPONSE;
22043deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_m_preq, sizeof(sm_pairing_packet_t));
22053deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
22063deb3ec6SMatthias Ringwald                 break;
22073deb3ec6SMatthias Ringwald 
220827c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
220941d32297SMatthias Ringwald 
2210c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_PUBLIC_KEY_COMMAND: {
221127c32905SMatthias Ringwald                 uint8_t buffer[65];
221227c32905SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_PUBLIC_KEY;
221327c32905SMatthias Ringwald                 //
221405299751SMatthias Ringwald                 reverse_256(ec_qx, &buffer[1]);
221505299751SMatthias Ringwald                 reverse_256(ec_qy, &buffer[33]);
2216e53be891SMatthias Ringwald 
221745a61d50SMatthias Ringwald                 // stk generation method
221845a61d50SMatthias Ringwald                 // passkey entry: notify app to show passkey or to request passkey
221945a61d50SMatthias Ringwald                 switch (setup->sm_stk_generation_method){
222045a61d50SMatthias Ringwald                     case JUST_WORKS:
222145a61d50SMatthias Ringwald                     case NK_BOTH_INPUT:
222227c32905SMatthias Ringwald                         if (connection->sm_role){
222307036a04SMatthias Ringwald                             // responder
2224b35a3de2SMatthias Ringwald                             sm_sc_start_calculating_local_confirm(connection);
222527c32905SMatthias Ringwald                         } else {
222607036a04SMatthias Ringwald                             // initiator
2227c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
222827c32905SMatthias Ringwald                         }
222945a61d50SMatthias Ringwald                         break;
223045a61d50SMatthias Ringwald                     case PK_INIT_INPUT:
223145a61d50SMatthias Ringwald                     case PK_RESP_INPUT:
223245a61d50SMatthias Ringwald                     case OK_BOTH_INPUT:
223307036a04SMatthias Ringwald                         // use random TK for display
223445a61d50SMatthias Ringwald                         memcpy(setup->sm_ra, setup->sm_tk, 16);
223545a61d50SMatthias Ringwald                         memcpy(setup->sm_rb, setup->sm_tk, 16);
223645a61d50SMatthias Ringwald                         setup->sm_passkey_bit = 0;
223707036a04SMatthias Ringwald 
223845a61d50SMatthias Ringwald                         if (connection->sm_role){
223945a61d50SMatthias Ringwald                             // responder
2240c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
224145a61d50SMatthias Ringwald                         } else {
224245a61d50SMatthias Ringwald                             // initiator
2243c6b7cbd9SMatthias Ringwald                             connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
224445a61d50SMatthias Ringwald                         }
224545a61d50SMatthias Ringwald                         sm_trigger_user_response(connection);
224645a61d50SMatthias Ringwald                         break;
224745a61d50SMatthias Ringwald                     case OOB:
224845a61d50SMatthias Ringwald                         // TODO: implement SC OOB
224945a61d50SMatthias Ringwald                         break;
225045a61d50SMatthias Ringwald                 }
225145a61d50SMatthias Ringwald 
225227c32905SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
225327c32905SMatthias Ringwald                 sm_timeout_reset(connection);
225427c32905SMatthias Ringwald                 break;
225527c32905SMatthias Ringwald             }
2256c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_CONFIRMATION: {
2257e53be891SMatthias Ringwald                 uint8_t buffer[17];
2258e53be891SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_CONFIRM;
22599af0f475SMatthias Ringwald                 reverse_128(setup->sm_local_confirm, &buffer[1]);
2260e53be891SMatthias Ringwald                 if (connection->sm_role){
2261c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
2262e53be891SMatthias Ringwald                 } else {
2263c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
2264e53be891SMatthias Ringwald                 }
2265e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2266e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2267e53be891SMatthias Ringwald                 break;
2268e53be891SMatthias Ringwald             }
2269c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_PAIRING_RANDOM: {
2270e53be891SMatthias Ringwald                 uint8_t buffer[17];
2271e53be891SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_RANDOM;
2272e53be891SMatthias Ringwald                 reverse_128(setup->sm_local_nonce, &buffer[1]);
227345a61d50SMatthias Ringwald                 if (setup->sm_stk_generation_method != JUST_WORKS && setup->sm_stk_generation_method != NK_BOTH_INPUT && setup->sm_passkey_bit < 20){
227445a61d50SMatthias Ringwald                     if (connection->sm_role){
227545a61d50SMatthias Ringwald                         // responder
2276c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_CONFIRMATION;
227745a61d50SMatthias Ringwald                     } else {
227845a61d50SMatthias Ringwald                         // initiator
2279c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
228045a61d50SMatthias Ringwald                     }
228145a61d50SMatthias Ringwald                 } else {
2282e53be891SMatthias Ringwald                     if (connection->sm_role){
2283e53be891SMatthias Ringwald                         // responder
2284446a8c36SMatthias Ringwald                         if (setup->sm_stk_generation_method == NK_BOTH_INPUT){
2285901c000fSMatthias Ringwald                             connection->sm_engine_state = SM_SC_W2_CALCULATE_G2;
22862886623dSMatthias Ringwald                         } else {
22872886623dSMatthias Ringwald                             sm_sc_prepare_dhkey_check(connection);
2288446a8c36SMatthias Ringwald                         }
2289e53be891SMatthias Ringwald                     } else {
2290136d331aSMatthias Ringwald                         // initiator
2291c6b7cbd9SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W4_PAIRING_RANDOM;
2292e53be891SMatthias Ringwald                     }
229345a61d50SMatthias Ringwald                 }
2294e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2295e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2296e53be891SMatthias Ringwald                 break;
2297e53be891SMatthias Ringwald             }
2298c6b7cbd9SMatthias Ringwald             case SM_SC_SEND_DHKEY_CHECK_COMMAND: {
2299e083ca23SMatthias Ringwald                 uint8_t buffer[17];
2300e083ca23SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_DHKEY_CHECK;
2301e53be891SMatthias Ringwald                 reverse_128(setup->sm_local_dhkey_check, &buffer[1]);
2302dc300847SMatthias Ringwald 
2303e53be891SMatthias Ringwald                 if (connection->sm_role){
2304c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_LTK_REQUEST_SC;
2305e53be891SMatthias Ringwald                 } else {
2306c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_DHKEY_CHECK_COMMAND;
2307e53be891SMatthias Ringwald                 }
2308e083ca23SMatthias Ringwald 
2309e53be891SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
2310e53be891SMatthias Ringwald                 sm_timeout_reset(connection);
2311e53be891SMatthias Ringwald                 break;
2312e53be891SMatthias Ringwald             }
2313e53be891SMatthias Ringwald 
2314e53be891SMatthias Ringwald #endif
23153deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE:
23163deb3ec6SMatthias Ringwald                 // echo initiator for now
23171ad129beSMatthias Ringwald                 sm_pairing_packet_set_code(setup->sm_s_pres,SM_CODE_PAIRING_RESPONSE);
23183deb3ec6SMatthias Ringwald                 key_distribution_flags = sm_key_distribution_flags_for_auth_req();
23191ad129beSMatthias Ringwald 
232027c32905SMatthias Ringwald                 if (setup->sm_use_secure_connections){
2321c6b7cbd9SMatthias Ringwald                     connection->sm_engine_state = SM_SC_W4_PUBLIC_KEY_COMMAND;
232252f9cf63SMatthias Ringwald                     // skip LTK/EDIV for SC
2323bbf8db22SMatthias Ringwald                     log_info("sm: dropping encryption information flag");
232452f9cf63SMatthias Ringwald                     key_distribution_flags &= ~SM_KEYDIST_ENC_KEY;
23250b8af2a5SMatthias Ringwald                 } else {
23260b8af2a5SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH1_W4_PAIRING_CONFIRM;
232727c32905SMatthias Ringwald                 }
23280b8af2a5SMatthias Ringwald 
232952f9cf63SMatthias 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);
233052f9cf63SMatthias 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);
2331bbf8db22SMatthias Ringwald                 // update key distribution after ENC was dropped
2332cfd5ff74SMatthias Ringwald                 sm_setup_key_distribution(sm_pairing_packet_get_responder_key_distribution(setup->sm_s_pres));
233352f9cf63SMatthias Ringwald 
23343deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) &setup->sm_s_pres, sizeof(sm_pairing_packet_t));
23353deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
2336446a8c36SMatthias Ringwald                 // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged
23370b8af2a5SMatthias Ringwald                 if (!setup->sm_use_secure_connections || setup->sm_stk_generation_method == JUST_WORKS){
23383deb3ec6SMatthias Ringwald                     sm_trigger_user_response(connection);
2339446a8c36SMatthias Ringwald                 }
23403deb3ec6SMatthias Ringwald                 return;
23413deb3ec6SMatthias Ringwald 
23423deb3ec6SMatthias Ringwald             case SM_PH2_SEND_PAIRING_RANDOM: {
23433deb3ec6SMatthias Ringwald                 uint8_t buffer[17];
23443deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_RANDOM;
23459c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_local_random, &buffer[1]);
23463deb3ec6SMatthias Ringwald                 if (connection->sm_role){
23473deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH2_W4_LTK_REQUEST;
23483deb3ec6SMatthias Ringwald                 } else {
23493deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_RANDOM;
23503deb3ec6SMatthias Ringwald                 }
23513deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
23523deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
23533deb3ec6SMatthias Ringwald                 break;
23543deb3ec6SMatthias Ringwald             }
23553deb3ec6SMatthias Ringwald 
23563deb3ec6SMatthias Ringwald             case SM_PH2_GET_RANDOM_TK:
23573deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_RANDOM_A:
23583deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_RANDOM_B:
23593deb3ec6SMatthias Ringwald             case SM_PH3_GET_RANDOM:
23603deb3ec6SMatthias Ringwald             case SM_PH3_GET_DIV:
23613deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
23623deb3ec6SMatthias Ringwald                 sm_random_start(connection);
23633deb3ec6SMatthias Ringwald                 return;
23643deb3ec6SMatthias Ringwald 
23653deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_B:
23663deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_D:
23673deb3ec6SMatthias Ringwald                 // already busy?
23683deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
23693deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
23703deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, setup->sm_c1_t3_value, connection);
23713deb3ec6SMatthias Ringwald                 return;
23723deb3ec6SMatthias Ringwald 
23733deb3ec6SMatthias Ringwald             case SM_PH3_LTK_GET_ENC:
23743deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH4_LTK_GET_ENC:
23753deb3ec6SMatthias Ringwald                 // already busy?
23763deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_IDLE) {
23773deb3ec6SMatthias Ringwald                     sm_key_t d_prime;
23783deb3ec6SMatthias Ringwald                     sm_d1_d_prime(setup->sm_local_div, 0, d_prime);
23793deb3ec6SMatthias Ringwald                     sm_next_responding_state(connection);
23803deb3ec6SMatthias Ringwald                     sm_aes128_start(sm_persistent_er, d_prime, connection);
23813deb3ec6SMatthias Ringwald                     return;
23823deb3ec6SMatthias Ringwald                 }
23833deb3ec6SMatthias Ringwald                 break;
23843deb3ec6SMatthias Ringwald 
23853deb3ec6SMatthias Ringwald             case SM_PH3_CSRK_GET_ENC:
23863deb3ec6SMatthias Ringwald                 // already busy?
23873deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_IDLE) {
23883deb3ec6SMatthias Ringwald                     sm_key_t d_prime;
23893deb3ec6SMatthias Ringwald                     sm_d1_d_prime(setup->sm_local_div, 1, d_prime);
23903deb3ec6SMatthias Ringwald                     sm_next_responding_state(connection);
23913deb3ec6SMatthias Ringwald                     sm_aes128_start(sm_persistent_er, d_prime, connection);
23923deb3ec6SMatthias Ringwald                     return;
23933deb3ec6SMatthias Ringwald                 }
23943deb3ec6SMatthias Ringwald                 break;
23953deb3ec6SMatthias Ringwald 
23963deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_C:
23973deb3ec6SMatthias Ringwald                 // already busy?
23983deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
23993deb3ec6SMatthias Ringwald                 // calculate m_confirm using aes128 engine - step 1
24003deb3ec6SMatthias 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);
24013deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24023deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24033deb3ec6SMatthias Ringwald                 break;
24043deb3ec6SMatthias Ringwald             case SM_PH2_C1_GET_ENC_A:
24053deb3ec6SMatthias Ringwald                 // already busy?
24063deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24073deb3ec6SMatthias Ringwald                 // calculate confirm using aes128 engine - step 1
24083deb3ec6SMatthias 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);
24093deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24103deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24113deb3ec6SMatthias Ringwald                 break;
24123deb3ec6SMatthias Ringwald             case SM_PH2_CALC_STK:
24133deb3ec6SMatthias Ringwald                 // already busy?
24143deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24153deb3ec6SMatthias Ringwald                 // calculate STK
24163deb3ec6SMatthias Ringwald                 if (connection->sm_role){
24173deb3ec6SMatthias Ringwald                     sm_s1_r_prime(setup->sm_local_random, setup->sm_peer_random, plaintext);
24183deb3ec6SMatthias Ringwald                 } else {
24193deb3ec6SMatthias Ringwald                     sm_s1_r_prime(setup->sm_peer_random, setup->sm_local_random, plaintext);
24203deb3ec6SMatthias Ringwald                 }
24213deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24223deb3ec6SMatthias Ringwald                 sm_aes128_start(setup->sm_tk, plaintext, connection);
24233deb3ec6SMatthias Ringwald                 break;
24243deb3ec6SMatthias Ringwald             case SM_PH3_Y_GET_ENC:
24253deb3ec6SMatthias Ringwald                 // already busy?
24263deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24273deb3ec6SMatthias Ringwald                 // PH3B2 - calculate Y from      - enc
24283deb3ec6SMatthias Ringwald                 // Y = dm(DHK, Rand)
24293deb3ec6SMatthias Ringwald                 sm_dm_r_prime(setup->sm_local_rand, plaintext);
24303deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24313deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_dhk, plaintext, connection);
24323deb3ec6SMatthias Ringwald                 return;
24333deb3ec6SMatthias Ringwald             case SM_PH2_C1_SEND_PAIRING_CONFIRM: {
24343deb3ec6SMatthias Ringwald                 uint8_t buffer[17];
24353deb3ec6SMatthias Ringwald                 buffer[0] = SM_CODE_PAIRING_CONFIRM;
24369c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_local_confirm, &buffer[1]);
24373deb3ec6SMatthias Ringwald                 if (connection->sm_role){
24383deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_RESPONDER_PH2_W4_PAIRING_RANDOM;
24393deb3ec6SMatthias Ringwald                 } else {
24403deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_PH2_W4_PAIRING_CONFIRM;
24413deb3ec6SMatthias Ringwald                 }
24423deb3ec6SMatthias Ringwald                 l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
24433deb3ec6SMatthias Ringwald                 sm_timeout_reset(connection);
24443deb3ec6SMatthias Ringwald                 return;
24453deb3ec6SMatthias Ringwald             }
24463deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH2_SEND_LTK_REPLY: {
24473deb3ec6SMatthias Ringwald                 sm_key_t stk_flipped;
24489c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_ltk, stk_flipped);
24493deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED;
24503deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, stk_flipped);
24513deb3ec6SMatthias Ringwald                 return;
24523deb3ec6SMatthias Ringwald             }
24533deb3ec6SMatthias Ringwald             case SM_INITIATOR_PH3_SEND_START_ENCRYPTION: {
24543deb3ec6SMatthias Ringwald                 sm_key_t stk_flipped;
24559c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_ltk, stk_flipped);
24563deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_W4_CONNECTION_ENCRYPTED;
24573deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_start_encryption, connection->sm_handle, 0, 0, 0, stk_flipped);
24583deb3ec6SMatthias Ringwald                 return;
24593deb3ec6SMatthias Ringwald             }
2460d7471931SMatthias Ringwald             case SM_RESPONDER_PH4_SEND_LTK_REPLY: {
24613deb3ec6SMatthias Ringwald                 sm_key_t ltk_flipped;
24629c80e4ccSMatthias Ringwald                 reverse_128(setup->sm_ltk, ltk_flipped);
24633deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_IDLE;
24643deb3ec6SMatthias Ringwald                 hci_send_cmd(&hci_le_long_term_key_request_reply, connection->sm_handle, ltk_flipped);
24653deb3ec6SMatthias Ringwald                 return;
24663deb3ec6SMatthias Ringwald             }
24673deb3ec6SMatthias Ringwald             case SM_RESPONDER_PH4_Y_GET_ENC:
24683deb3ec6SMatthias Ringwald                 // already busy?
24693deb3ec6SMatthias Ringwald                 if (sm_aes128_state == SM_AES128_ACTIVE) break;
24703deb3ec6SMatthias Ringwald                 log_info("LTK Request: recalculating with ediv 0x%04x", setup->sm_local_ediv);
24713deb3ec6SMatthias Ringwald                 // Y = dm(DHK, Rand)
24723deb3ec6SMatthias Ringwald                 sm_dm_r_prime(setup->sm_local_rand, plaintext);
24733deb3ec6SMatthias Ringwald                 sm_next_responding_state(connection);
24743deb3ec6SMatthias Ringwald                 sm_aes128_start(sm_persistent_dhk, plaintext, connection);
24753deb3ec6SMatthias Ringwald                 return;
24763deb3ec6SMatthias Ringwald 
24773deb3ec6SMatthias Ringwald             case SM_PH3_DISTRIBUTE_KEYS:
24783deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION){
24793deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
24803deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
24813deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_ENCRYPTION_INFORMATION;
24829c80e4ccSMatthias Ringwald                     reverse_128(setup->sm_ltk, &buffer[1]);
24833deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
24843deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
24853deb3ec6SMatthias Ringwald                     return;
24863deb3ec6SMatthias Ringwald                 }
24873deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_MASTER_IDENTIFICATION){
24883deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
24893deb3ec6SMatthias Ringwald                     uint8_t buffer[11];
24903deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_MASTER_IDENTIFICATION;
2491f8fbdce0SMatthias Ringwald                     little_endian_store_16(buffer, 1, setup->sm_local_ediv);
24929c80e4ccSMatthias Ringwald                     reverse_64(setup->sm_local_rand, &buffer[3]);
24933deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
24943deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
24953deb3ec6SMatthias Ringwald                     return;
24963deb3ec6SMatthias Ringwald                 }
24973deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_IDENTITY_INFORMATION){
24983deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
24993deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
25003deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_IDENTITY_INFORMATION;
25019c80e4ccSMatthias Ringwald                     reverse_128(sm_persistent_irk, &buffer[1]);
25023deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25033deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25043deb3ec6SMatthias Ringwald                     return;
25053deb3ec6SMatthias Ringwald                 }
25063deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION){
25073deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
25083deb3ec6SMatthias Ringwald                     bd_addr_t local_address;
25093deb3ec6SMatthias Ringwald                     uint8_t buffer[8];
25103deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_IDENTITY_ADDRESS_INFORMATION;
251115a95bd5SMatthias Ringwald                     gap_advertisements_get_address(&buffer[1], local_address);
2512724d70a2SMatthias Ringwald                     reverse_bd_addr(local_address, &buffer[2]);
25133deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25143deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25153deb3ec6SMatthias Ringwald                     return;
25163deb3ec6SMatthias Ringwald                 }
25173deb3ec6SMatthias Ringwald                 if (setup->sm_key_distribution_send_set &   SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION){
25183deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_send_set &= ~SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
25193deb3ec6SMatthias Ringwald 
25203deb3ec6SMatthias Ringwald                     // hack to reproduce test runs
25213deb3ec6SMatthias Ringwald                     if (test_use_fixed_local_csrk){
25223deb3ec6SMatthias Ringwald                         memset(setup->sm_local_csrk, 0xcc, 16);
25233deb3ec6SMatthias Ringwald                     }
25243deb3ec6SMatthias Ringwald 
25253deb3ec6SMatthias Ringwald                     uint8_t buffer[17];
25263deb3ec6SMatthias Ringwald                     buffer[0] = SM_CODE_SIGNING_INFORMATION;
25279c80e4ccSMatthias Ringwald                     reverse_128(setup->sm_local_csrk, &buffer[1]);
25283deb3ec6SMatthias Ringwald                     l2cap_send_connectionless(connection->sm_handle, L2CAP_CID_SECURITY_MANAGER_PROTOCOL, (uint8_t*) buffer, sizeof(buffer));
25293deb3ec6SMatthias Ringwald                     sm_timeout_reset(connection);
25303deb3ec6SMatthias Ringwald                     return;
25313deb3ec6SMatthias Ringwald                 }
25323deb3ec6SMatthias Ringwald 
25333deb3ec6SMatthias Ringwald                 // keys are sent
25343deb3ec6SMatthias Ringwald                 if (connection->sm_role){
25353deb3ec6SMatthias Ringwald                     // slave -> receive master keys if any
25363deb3ec6SMatthias Ringwald                     if (sm_key_distribution_all_received(connection)){
25373deb3ec6SMatthias Ringwald                         sm_key_distribution_handle_all_received(connection);
25383deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_RESPONDER_IDLE;
25393deb3ec6SMatthias Ringwald                         sm_done_for_handle(connection->sm_handle);
25403deb3ec6SMatthias Ringwald                     } else {
25413deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_PH3_RECEIVE_KEYS;
25423deb3ec6SMatthias Ringwald                     }
25433deb3ec6SMatthias Ringwald                 } else {
25443deb3ec6SMatthias Ringwald                     // master -> all done
25453deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_INITIATOR_CONNECTED;
25463deb3ec6SMatthias Ringwald                     sm_done_for_handle(connection->sm_handle);
25473deb3ec6SMatthias Ringwald                 }
25483deb3ec6SMatthias Ringwald                 break;
25493deb3ec6SMatthias Ringwald 
25503deb3ec6SMatthias Ringwald             default:
25513deb3ec6SMatthias Ringwald                 break;
25523deb3ec6SMatthias Ringwald         }
25533deb3ec6SMatthias Ringwald 
25543deb3ec6SMatthias Ringwald         // check again if active connection was released
25553deb3ec6SMatthias Ringwald         if (sm_active_connection) break;
25563deb3ec6SMatthias Ringwald     }
25573deb3ec6SMatthias Ringwald }
25583deb3ec6SMatthias Ringwald 
25593deb3ec6SMatthias Ringwald // note: aes engine is ready as we just got the aes result
25603deb3ec6SMatthias Ringwald static void sm_handle_encryption_result(uint8_t * data){
25613deb3ec6SMatthias Ringwald 
25623deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_IDLE;
25633deb3ec6SMatthias Ringwald 
25643deb3ec6SMatthias Ringwald     if (sm_address_resolution_ah_calculation_active){
25653deb3ec6SMatthias Ringwald         sm_address_resolution_ah_calculation_active = 0;
25663deb3ec6SMatthias Ringwald         // compare calulated address against connecting device
25673deb3ec6SMatthias Ringwald         uint8_t hash[3];
25689c80e4ccSMatthias Ringwald         reverse_24(data, hash);
25693deb3ec6SMatthias Ringwald         if (memcmp(&sm_address_resolution_address[3], hash, 3) == 0){
25703deb3ec6SMatthias Ringwald             log_info("LE Device Lookup: matched resolvable private address");
25713deb3ec6SMatthias Ringwald             sm_address_resolution_handle_event(ADDRESS_RESOLUTION_SUCEEDED);
25723deb3ec6SMatthias Ringwald             return;
25733deb3ec6SMatthias Ringwald         }
25743deb3ec6SMatthias Ringwald         // no match, try next
25753deb3ec6SMatthias Ringwald         sm_address_resolution_test++;
25763deb3ec6SMatthias Ringwald         return;
25773deb3ec6SMatthias Ringwald     }
25783deb3ec6SMatthias Ringwald 
25793deb3ec6SMatthias Ringwald     switch (dkg_state){
25803deb3ec6SMatthias Ringwald         case DKG_W4_IRK:
25819c80e4ccSMatthias Ringwald             reverse_128(data, sm_persistent_irk);
25828314c363SMatthias Ringwald             log_info_key("irk", sm_persistent_irk);
25833deb3ec6SMatthias Ringwald             dkg_next_state();
25843deb3ec6SMatthias Ringwald             return;
25853deb3ec6SMatthias Ringwald         case DKG_W4_DHK:
25869c80e4ccSMatthias Ringwald             reverse_128(data, sm_persistent_dhk);
25878314c363SMatthias Ringwald             log_info_key("dhk", sm_persistent_dhk);
25883deb3ec6SMatthias Ringwald             dkg_next_state();
25896f792faaSMatthias Ringwald             // SM Init Finished
25903deb3ec6SMatthias Ringwald             return;
25913deb3ec6SMatthias Ringwald         default:
25923deb3ec6SMatthias Ringwald             break;
25933deb3ec6SMatthias Ringwald     }
25943deb3ec6SMatthias Ringwald 
25953deb3ec6SMatthias Ringwald     switch (rau_state){
25963deb3ec6SMatthias Ringwald         case RAU_W4_ENC:
25979c80e4ccSMatthias Ringwald             reverse_24(data, &sm_random_address[3]);
25983deb3ec6SMatthias Ringwald             rau_next_state();
25993deb3ec6SMatthias Ringwald             return;
26003deb3ec6SMatthias Ringwald         default:
26013deb3ec6SMatthias Ringwald             break;
26023deb3ec6SMatthias Ringwald     }
26033deb3ec6SMatthias Ringwald 
26047a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
26053deb3ec6SMatthias Ringwald     switch (sm_cmac_state){
26063deb3ec6SMatthias Ringwald         case CMAC_W4_SUBKEYS:
26073deb3ec6SMatthias Ringwald         case CMAC_W4_MI:
26083deb3ec6SMatthias Ringwald         case CMAC_W4_MLAST:
26093deb3ec6SMatthias Ringwald             {
26103deb3ec6SMatthias Ringwald             sm_key_t t;
26119c80e4ccSMatthias Ringwald             reverse_128(data, t);
26123deb3ec6SMatthias Ringwald             sm_cmac_handle_encryption_result(t);
26133deb3ec6SMatthias Ringwald             }
26143deb3ec6SMatthias Ringwald             return;
26153deb3ec6SMatthias Ringwald         default:
26163deb3ec6SMatthias Ringwald             break;
26173deb3ec6SMatthias Ringwald     }
26187a766ebfSMatthias Ringwald #endif
26193deb3ec6SMatthias Ringwald 
26203deb3ec6SMatthias Ringwald     // retrieve sm_connection provided to sm_aes128_start_encryption
26213deb3ec6SMatthias Ringwald     sm_connection_t * connection = (sm_connection_t*) sm_aes128_context;
26223deb3ec6SMatthias Ringwald     if (!connection) return;
26233deb3ec6SMatthias Ringwald     switch (connection->sm_engine_state){
26243deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_A:
26253deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_C:
26263deb3ec6SMatthias Ringwald             {
26273deb3ec6SMatthias Ringwald             sm_key_t t2;
26289c80e4ccSMatthias Ringwald             reverse_128(data, t2);
26293deb3ec6SMatthias Ringwald             sm_c1_t3(t2, setup->sm_m_address, setup->sm_s_address, setup->sm_c1_t3_value);
26303deb3ec6SMatthias Ringwald             }
26313deb3ec6SMatthias Ringwald             sm_next_responding_state(connection);
26323deb3ec6SMatthias Ringwald             return;
26333deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_B:
26349c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_local_confirm);
26358314c363SMatthias Ringwald             log_info_key("c1!", setup->sm_local_confirm);
26363deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_SEND_PAIRING_CONFIRM;
26373deb3ec6SMatthias Ringwald             return;
26383deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_ENC_D:
26393deb3ec6SMatthias Ringwald             {
26403deb3ec6SMatthias Ringwald             sm_key_t peer_confirm_test;
26419c80e4ccSMatthias Ringwald             reverse_128(data, peer_confirm_test);
26428314c363SMatthias Ringwald             log_info_key("c1!", peer_confirm_test);
26433deb3ec6SMatthias Ringwald             if (memcmp(setup->sm_peer_confirm, peer_confirm_test, 16) != 0){
26443deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = SM_REASON_CONFIRM_VALUE_FAILED;
26453deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
26463deb3ec6SMatthias Ringwald                 return;
26473deb3ec6SMatthias Ringwald             }
26483deb3ec6SMatthias Ringwald             if (connection->sm_role){
26493deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM;
26503deb3ec6SMatthias Ringwald             } else {
26513deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH2_CALC_STK;
26523deb3ec6SMatthias Ringwald             }
26533deb3ec6SMatthias Ringwald             }
26543deb3ec6SMatthias Ringwald             return;
26553deb3ec6SMatthias Ringwald         case SM_PH2_W4_STK:
26569c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
26573deb3ec6SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size);
26588314c363SMatthias Ringwald             log_info_key("stk", setup->sm_ltk);
26593deb3ec6SMatthias Ringwald             if (connection->sm_role){
26603deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY;
26613deb3ec6SMatthias Ringwald             } else {
26623deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_INITIATOR_PH3_SEND_START_ENCRYPTION;
26633deb3ec6SMatthias Ringwald             }
26643deb3ec6SMatthias Ringwald             return;
26653deb3ec6SMatthias Ringwald         case SM_PH3_Y_W4_ENC:{
26663deb3ec6SMatthias Ringwald             sm_key_t y128;
26679c80e4ccSMatthias Ringwald             reverse_128(data, y128);
2668f8fbdce0SMatthias Ringwald             setup->sm_local_y = big_endian_read_16(y128, 14);
26693deb3ec6SMatthias Ringwald             log_info_hex16("y", setup->sm_local_y);
26703deb3ec6SMatthias Ringwald             // PH3B3 - calculate EDIV
26713deb3ec6SMatthias Ringwald             setup->sm_local_ediv = setup->sm_local_y ^ setup->sm_local_div;
26723deb3ec6SMatthias Ringwald             log_info_hex16("ediv", setup->sm_local_ediv);
26733deb3ec6SMatthias Ringwald             // PH3B4 - calculate LTK         - enc
26743deb3ec6SMatthias Ringwald             // LTK = d1(ER, DIV, 0))
26753deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_LTK_GET_ENC;
26763deb3ec6SMatthias Ringwald             return;
26773deb3ec6SMatthias Ringwald         }
26783deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH4_Y_W4_ENC:{
26793deb3ec6SMatthias Ringwald             sm_key_t y128;
26809c80e4ccSMatthias Ringwald             reverse_128(data, y128);
2681f8fbdce0SMatthias Ringwald             setup->sm_local_y = big_endian_read_16(y128, 14);
26823deb3ec6SMatthias Ringwald             log_info_hex16("y", setup->sm_local_y);
26833deb3ec6SMatthias Ringwald 
26843deb3ec6SMatthias Ringwald             // PH3B3 - calculate DIV
26853deb3ec6SMatthias Ringwald             setup->sm_local_div = setup->sm_local_y ^ setup->sm_local_ediv;
26863deb3ec6SMatthias Ringwald             log_info_hex16("ediv", setup->sm_local_ediv);
26873deb3ec6SMatthias Ringwald             // PH3B4 - calculate LTK         - enc
26883deb3ec6SMatthias Ringwald             // LTK = d1(ER, DIV, 0))
26893deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_RESPONDER_PH4_LTK_GET_ENC;
26903deb3ec6SMatthias Ringwald             return;
26913deb3ec6SMatthias Ringwald         }
26923deb3ec6SMatthias Ringwald         case SM_PH3_LTK_W4_ENC:
26939c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
26948314c363SMatthias Ringwald             log_info_key("ltk", setup->sm_ltk);
26953deb3ec6SMatthias Ringwald             // calc CSRK next
26963deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_CSRK_GET_ENC;
26973deb3ec6SMatthias Ringwald             return;
26983deb3ec6SMatthias Ringwald         case SM_PH3_CSRK_W4_ENC:
26999c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_local_csrk);
27008314c363SMatthias Ringwald             log_info_key("csrk", setup->sm_local_csrk);
27013deb3ec6SMatthias Ringwald             if (setup->sm_key_distribution_send_set){
27023deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
27033deb3ec6SMatthias Ringwald             } else {
27043deb3ec6SMatthias Ringwald                 // no keys to send, just continue
27053deb3ec6SMatthias Ringwald                 if (connection->sm_role){
27063deb3ec6SMatthias Ringwald                     // slave -> receive master keys
27073deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_PH3_RECEIVE_KEYS;
27083deb3ec6SMatthias Ringwald                 } else {
27092bacf595SMatthias Ringwald                     if (setup->sm_use_secure_connections && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION)){
27102bacf595SMatthias Ringwald                         connection->sm_engine_state = SM_SC_W2_CALCULATE_H6_ILK;
27112bacf595SMatthias Ringwald                     } else {
27123deb3ec6SMatthias Ringwald                         // master -> all done
27133deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_INITIATOR_CONNECTED;
27143deb3ec6SMatthias Ringwald                         sm_done_for_handle(connection->sm_handle);
27153deb3ec6SMatthias Ringwald                     }
27163deb3ec6SMatthias Ringwald                 }
27172bacf595SMatthias Ringwald             }
27183deb3ec6SMatthias Ringwald             return;
27193deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH4_LTK_W4_ENC:
27209c80e4ccSMatthias Ringwald             reverse_128(data, setup->sm_ltk);
27213deb3ec6SMatthias Ringwald             sm_truncate_key(setup->sm_ltk, connection->sm_actual_encryption_key_size);
27228314c363SMatthias Ringwald             log_info_key("ltk", setup->sm_ltk);
2723d7471931SMatthias Ringwald             connection->sm_engine_state = SM_RESPONDER_PH4_SEND_LTK_REPLY;
27243deb3ec6SMatthias Ringwald             return;
27253deb3ec6SMatthias Ringwald         default:
27263deb3ec6SMatthias Ringwald             break;
27273deb3ec6SMatthias Ringwald     }
27283deb3ec6SMatthias Ringwald }
27293deb3ec6SMatthias Ringwald 
2730e722521aSMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
2731e722521aSMatthias Ringwald 
27327df18c15SMatthias Ringwald static int sm_generate_f_rng(void * context, unsigned char * buffer, size_t size){
27339ec2630cSMatthias Ringwald     UNUSED(context);
27349ec2630cSMatthias Ringwald 
27357df18c15SMatthias Ringwald     int offset = setup->sm_passkey_bit;
27367df18c15SMatthias Ringwald     log_info("sm_generate_f_rng: size %u - offset %u", (int) size, offset);
27377df18c15SMatthias Ringwald     while (size) {
27387df18c15SMatthias Ringwald         if (offset < 32){
27397df18c15SMatthias Ringwald             *buffer++ = setup->sm_peer_qx[offset++];
27407df18c15SMatthias Ringwald         } else {
27417df18c15SMatthias Ringwald             *buffer++ = setup->sm_peer_qx[offset++ - 32];
27427df18c15SMatthias Ringwald         }
27437df18c15SMatthias Ringwald         size--;
27447df18c15SMatthias Ringwald     }
27457df18c15SMatthias Ringwald     setup->sm_passkey_bit = offset;
27467df18c15SMatthias Ringwald     return 0;
27477df18c15SMatthias Ringwald }
27487df18c15SMatthias Ringwald #endif
27497df18c15SMatthias Ringwald 
27503deb3ec6SMatthias Ringwald // note: random generator is ready. this doesn NOT imply that aes engine is unused!
27513deb3ec6SMatthias Ringwald static void sm_handle_random_result(uint8_t * data){
27523deb3ec6SMatthias Ringwald 
27537df18c15SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
27547df18c15SMatthias Ringwald     if (ec_key_generation_state == EC_KEY_GENERATION_ACTIVE){
27557df18c15SMatthias Ringwald         int num_bytes = setup->sm_passkey_bit;
27567df18c15SMatthias Ringwald         if (num_bytes < 32){
27577df18c15SMatthias Ringwald             memcpy(&setup->sm_peer_qx[num_bytes], data, 8);
27587df18c15SMatthias Ringwald         } else {
27597df18c15SMatthias Ringwald             memcpy(&setup->sm_peer_qx[num_bytes-32], data, 8);
27607df18c15SMatthias Ringwald         }
27617df18c15SMatthias Ringwald         num_bytes += 8;
27627df18c15SMatthias Ringwald         setup->sm_passkey_bit = num_bytes;
27637df18c15SMatthias Ringwald 
27647df18c15SMatthias Ringwald         if (num_bytes >= 64){
2765ae4aa2b6SMatthias Ringwald 
27667df18c15SMatthias Ringwald             // generate EC key
27677df18c15SMatthias Ringwald             setup->sm_passkey_bit = 0;
2768e722521aSMatthias Ringwald             mbedtls_mpi d;
2769e722521aSMatthias Ringwald             mbedtls_ecp_point P;
2770e722521aSMatthias Ringwald             mbedtls_mpi_init(&d);
2771e722521aSMatthias Ringwald             mbedtls_ecp_point_init(&P);
27722e6217a0SMatthias Ringwald             int res = mbedtls_ecp_gen_keypair(&mbedtls_ec_group, &d, &P, &sm_generate_f_rng, NULL);
27732e6217a0SMatthias Ringwald             log_info("gen keypair %x", res);
27742e6217a0SMatthias Ringwald             mbedtls_mpi_write_binary(&P.X, ec_qx, 32);
27752e6217a0SMatthias Ringwald             mbedtls_mpi_write_binary(&P.Y, ec_qy, 32);
27762e6217a0SMatthias Ringwald             mbedtls_mpi_write_binary(&d, ec_d, 32);
2777e722521aSMatthias Ringwald             mbedtls_ecp_point_free(&P);
2778e722521aSMatthias Ringwald             mbedtls_mpi_free(&d);
27797df18c15SMatthias Ringwald             ec_key_generation_state = EC_KEY_GENERATION_DONE;
278009e4d397SMatthias Ringwald             log_info("Elliptic curve: d");
278109e4d397SMatthias Ringwald             log_info_hexdump(ec_d,32);
27822e6217a0SMatthias Ringwald             sm_log_ec_keypair();
2783a83a0544SMatthias Ringwald 
27842e6217a0SMatthias Ringwald #if 0
2785ae4aa2b6SMatthias Ringwald             int i;
2786a83a0544SMatthias Ringwald             sm_key256_t dhkey;
2787ae4aa2b6SMatthias Ringwald             for (i=0;i<10;i++){
2788ae4aa2b6SMatthias Ringwald                 // printf("test dhkey check\n");
2789a83a0544SMatthias Ringwald                 memcpy(setup->sm_peer_qx, ec_qx, 32);
2790a83a0544SMatthias Ringwald                 memcpy(setup->sm_peer_qy, ec_qy, 32);
2791a83a0544SMatthias Ringwald                 sm_sc_calculate_dhkey(dhkey);
2792ae4aa2b6SMatthias Ringwald                 // printf("test dhkey check end\n");
2793ae4aa2b6SMatthias Ringwald             }
2794a83a0544SMatthias Ringwald #endif
2795a83a0544SMatthias Ringwald 
27967df18c15SMatthias Ringwald         }
27977df18c15SMatthias Ringwald     }
27987df18c15SMatthias Ringwald #endif
27997df18c15SMatthias Ringwald 
28003deb3ec6SMatthias Ringwald     switch (rau_state){
28013deb3ec6SMatthias Ringwald         case RAU_W4_RANDOM:
28023deb3ec6SMatthias Ringwald             // non-resolvable vs. resolvable
28033deb3ec6SMatthias Ringwald             switch (gap_random_adress_type){
28043deb3ec6SMatthias Ringwald                 case GAP_RANDOM_ADDRESS_RESOLVABLE:
28053deb3ec6SMatthias Ringwald                     // resolvable: use random as prand and calc address hash
28063deb3ec6SMatthias Ringwald                     // "The two most significant bits of prand shall be equal to ‘0’ and ‘1"
28073deb3ec6SMatthias Ringwald                     memcpy(sm_random_address, data, 3);
28083deb3ec6SMatthias Ringwald                     sm_random_address[0] &= 0x3f;
28093deb3ec6SMatthias Ringwald                     sm_random_address[0] |= 0x40;
28103deb3ec6SMatthias Ringwald                     rau_state = RAU_GET_ENC;
28113deb3ec6SMatthias Ringwald                     break;
28123deb3ec6SMatthias Ringwald                 case GAP_RANDOM_ADDRESS_NON_RESOLVABLE:
28133deb3ec6SMatthias Ringwald                 default:
28143deb3ec6SMatthias Ringwald                     // "The two most significant bits of the address shall be equal to ‘0’""
28153deb3ec6SMatthias Ringwald                     memcpy(sm_random_address, data, 6);
28163deb3ec6SMatthias Ringwald                     sm_random_address[0] &= 0x3f;
28173deb3ec6SMatthias Ringwald                     rau_state = RAU_SET_ADDRESS;
28183deb3ec6SMatthias Ringwald                     break;
28193deb3ec6SMatthias Ringwald             }
28203deb3ec6SMatthias Ringwald             return;
28213deb3ec6SMatthias Ringwald         default:
28223deb3ec6SMatthias Ringwald             break;
28233deb3ec6SMatthias Ringwald     }
28243deb3ec6SMatthias Ringwald 
28253deb3ec6SMatthias Ringwald     // retrieve sm_connection provided to sm_random_start
28263deb3ec6SMatthias Ringwald     sm_connection_t * connection = (sm_connection_t *) sm_random_context;
28273deb3ec6SMatthias Ringwald     if (!connection) return;
28283deb3ec6SMatthias Ringwald     switch (connection->sm_engine_state){
2829f1c1783eSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2830f1c1783eSMatthias Ringwald         case SM_SC_W4_GET_RANDOM_A:
2831f1c1783eSMatthias Ringwald             memcpy(&setup->sm_local_nonce[0], data, 8);
2832f1c1783eSMatthias Ringwald             connection->sm_engine_state = SM_SC_W2_GET_RANDOM_B;
2833f1c1783eSMatthias Ringwald             break;
2834f1c1783eSMatthias Ringwald         case SM_SC_W4_GET_RANDOM_B:
2835f1c1783eSMatthias Ringwald             memcpy(&setup->sm_local_nonce[8], data, 8);
2836f1c1783eSMatthias Ringwald             // initiator & jw/nc -> send pairing random
2837f1c1783eSMatthias Ringwald             if (connection->sm_role == 0 && sm_just_works_or_numeric_comparison(setup->sm_stk_generation_method)){
2838f1c1783eSMatthias Ringwald                 connection->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
2839f1c1783eSMatthias Ringwald                 break;
2840b35a3de2SMatthias Ringwald             } else {
2841b35a3de2SMatthias Ringwald                 connection->sm_engine_state = SM_SC_W2_CMAC_FOR_CONFIRMATION;
2842f1c1783eSMatthias Ringwald             }
2843f1c1783eSMatthias Ringwald             break;
2844f1c1783eSMatthias Ringwald #endif
2845f1c1783eSMatthias Ringwald 
28463deb3ec6SMatthias Ringwald         case SM_PH2_W4_RANDOM_TK:
28473deb3ec6SMatthias Ringwald         {
28483deb3ec6SMatthias Ringwald             // map random to 0-999999 without speding much cycles on a modulus operation
2849f8fbdce0SMatthias Ringwald             uint32_t tk = little_endian_read_32(data,0);
28503deb3ec6SMatthias Ringwald             tk = tk & 0xfffff;  // 1048575
28513deb3ec6SMatthias Ringwald             if (tk >= 999999){
28523deb3ec6SMatthias Ringwald                 tk = tk - 999999;
28533deb3ec6SMatthias Ringwald             }
28543deb3ec6SMatthias Ringwald             sm_reset_tk();
2855f8fbdce0SMatthias Ringwald             big_endian_store_32(setup->sm_tk, 12, tk);
28563deb3ec6SMatthias Ringwald             if (connection->sm_role){
28573deb3ec6SMatthias Ringwald                 connection->sm_engine_state = SM_RESPONDER_PH1_SEND_PAIRING_RESPONSE;
28583deb3ec6SMatthias Ringwald             } else {
2859b41539d5SMatthias Ringwald                 if (setup->sm_use_secure_connections){
2860b41539d5SMatthias Ringwald                     connection->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
2861b41539d5SMatthias Ringwald                 } else {
28623deb3ec6SMatthias Ringwald                     connection->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
28633deb3ec6SMatthias Ringwald                     sm_trigger_user_response(connection);
28643deb3ec6SMatthias Ringwald                     // response_idle == nothing <--> sm_trigger_user_response() did not require response
28653deb3ec6SMatthias Ringwald                     if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
28663deb3ec6SMatthias Ringwald                         connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
28673deb3ec6SMatthias Ringwald                     }
28683deb3ec6SMatthias Ringwald                 }
2869b41539d5SMatthias Ringwald             }
28703deb3ec6SMatthias Ringwald             return;
28713deb3ec6SMatthias Ringwald         }
28723deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_RANDOM_A:
28733deb3ec6SMatthias Ringwald             memcpy(&setup->sm_local_random[0], data, 8); // random endinaness
28743deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_GET_RANDOM_B;
28753deb3ec6SMatthias Ringwald             return;
28763deb3ec6SMatthias Ringwald         case SM_PH2_C1_W4_RANDOM_B:
28773deb3ec6SMatthias Ringwald             memcpy(&setup->sm_local_random[8], data, 8); // random endinaness
28783deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH2_C1_GET_ENC_A;
28793deb3ec6SMatthias Ringwald             return;
28803deb3ec6SMatthias Ringwald         case SM_PH3_W4_RANDOM:
28819c80e4ccSMatthias Ringwald             reverse_64(data, setup->sm_local_rand);
28823deb3ec6SMatthias Ringwald             // no db for encryption size hack: encryption size is stored in lowest nibble of setup->sm_local_rand
28833deb3ec6SMatthias Ringwald             setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xf0) + (connection->sm_actual_encryption_key_size - 1);
28843deb3ec6SMatthias Ringwald             // no db for authenticated flag hack: store flag in bit 4 of LSB
28853deb3ec6SMatthias Ringwald             setup->sm_local_rand[7] = (setup->sm_local_rand[7] & 0xef) + (connection->sm_connection_authenticated << 4);
28863deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_GET_DIV;
28873deb3ec6SMatthias Ringwald             return;
28883deb3ec6SMatthias Ringwald         case SM_PH3_W4_DIV:
28893deb3ec6SMatthias Ringwald             // use 16 bit from random value as div
2890f8fbdce0SMatthias Ringwald             setup->sm_local_div = big_endian_read_16(data, 0);
28913deb3ec6SMatthias Ringwald             log_info_hex16("div", setup->sm_local_div);
28923deb3ec6SMatthias Ringwald             connection->sm_engine_state = SM_PH3_Y_GET_ENC;
28933deb3ec6SMatthias Ringwald             return;
28943deb3ec6SMatthias Ringwald         default:
28953deb3ec6SMatthias Ringwald             break;
28963deb3ec6SMatthias Ringwald     }
28973deb3ec6SMatthias Ringwald }
28983deb3ec6SMatthias Ringwald 
2899d9a7306aSMatthias Ringwald static void sm_event_packet_handler (uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
29003deb3ec6SMatthias Ringwald 
29019ec2630cSMatthias Ringwald     UNUSED(channel);
29029ec2630cSMatthias Ringwald     UNUSED(size);
29039ec2630cSMatthias Ringwald 
29043deb3ec6SMatthias Ringwald     sm_connection_t  * sm_conn;
2905711e6c80SMatthias Ringwald     hci_con_handle_t con_handle;
29063deb3ec6SMatthias Ringwald 
29073deb3ec6SMatthias Ringwald     switch (packet_type) {
29083deb3ec6SMatthias Ringwald 
29093deb3ec6SMatthias Ringwald 		case HCI_EVENT_PACKET:
29100e2df43fSMatthias Ringwald 			switch (hci_event_packet_get_type(packet)) {
29113deb3ec6SMatthias Ringwald 
29123deb3ec6SMatthias Ringwald                 case BTSTACK_EVENT_STATE:
29133deb3ec6SMatthias Ringwald 					// bt stack activated, get started
2914be7cc9a0SMilanka Ringwald 					if (btstack_event_state_get_state(packet) == HCI_STATE_WORKING){
29153deb3ec6SMatthias Ringwald                         log_info("HCI Working!");
2916f33ad81dSMatthias Ringwald 
2917f33ad81dSMatthias Ringwald                         // set local addr for le device db
2918f33ad81dSMatthias Ringwald                         bd_addr_t local_bd_addr;
2919f33ad81dSMatthias Ringwald                         gap_local_bd_addr(local_bd_addr);
2920f33ad81dSMatthias Ringwald                         le_device_db_set_local_bd_addr(local_bd_addr);
2921f33ad81dSMatthias Ringwald 
29223deb3ec6SMatthias Ringwald                         dkg_state = sm_persistent_irk_ready ? DKG_CALC_DHK : DKG_CALC_IRK;
292309e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
2924df86eb96SMatthias Ringwald                         if (!sm_have_ec_keypair){
29257df18c15SMatthias Ringwald                             setup->sm_passkey_bit = 0;
29267df18c15SMatthias Ringwald                             ec_key_generation_state = EC_KEY_GENERATION_ACTIVE;
29277df18c15SMatthias Ringwald                         }
29287df18c15SMatthias Ringwald #endif
292952b551c3SMatthias Ringwald                         // trigger Random Address generation if requested before
29308f57b085SMatthias Ringwald                         switch (gap_random_adress_type){
29318f57b085SMatthias Ringwald                             case GAP_RANDOM_ADDRESS_TYPE_OFF:
293252b551c3SMatthias Ringwald                                 rau_state = RAU_IDLE;
29338f57b085SMatthias Ringwald                                 break;
29348f57b085SMatthias Ringwald                             case GAP_RANDOM_ADDRESS_TYPE_STATIC:
29358f57b085SMatthias Ringwald                                 rau_state = RAU_SET_ADDRESS;
29368f57b085SMatthias Ringwald                                 break;
29378f57b085SMatthias Ringwald                             default:
29385777861bSMatthias Ringwald                                 rau_state = RAU_GET_RANDOM;
29398f57b085SMatthias Ringwald                                 break;
294052b551c3SMatthias Ringwald                         }
29413deb3ec6SMatthias Ringwald                         sm_run();
29423deb3ec6SMatthias Ringwald 					}
29433deb3ec6SMatthias Ringwald 					break;
29443deb3ec6SMatthias Ringwald 
29453deb3ec6SMatthias Ringwald                 case HCI_EVENT_LE_META:
29463deb3ec6SMatthias Ringwald                     switch (packet[2]) {
29473deb3ec6SMatthias Ringwald                         case HCI_SUBEVENT_LE_CONNECTION_COMPLETE:
29483deb3ec6SMatthias Ringwald 
29493deb3ec6SMatthias Ringwald                             log_info("sm: connected");
29503deb3ec6SMatthias Ringwald 
29513deb3ec6SMatthias Ringwald                             if (packet[3]) return; // connection failed
29523deb3ec6SMatthias Ringwald 
2953711e6c80SMatthias Ringwald                             con_handle = little_endian_read_16(packet, 4);
2954711e6c80SMatthias Ringwald                             sm_conn = sm_get_connection_for_handle(con_handle);
29553deb3ec6SMatthias Ringwald                             if (!sm_conn) break;
29563deb3ec6SMatthias Ringwald 
2957711e6c80SMatthias Ringwald                             sm_conn->sm_handle = con_handle;
29583deb3ec6SMatthias Ringwald                             sm_conn->sm_role = packet[6];
29593deb3ec6SMatthias Ringwald                             sm_conn->sm_peer_addr_type = packet[7];
296013377825SMatthias Ringwald                             reverse_bd_addr(&packet[8], sm_conn->sm_peer_address);
29613deb3ec6SMatthias Ringwald 
29623deb3ec6SMatthias Ringwald                             log_info("New sm_conn, role %s", sm_conn->sm_role ? "slave" : "master");
29633deb3ec6SMatthias Ringwald 
29643deb3ec6SMatthias Ringwald                             // reset security properties
29653deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_encrypted = 0;
29663deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_authenticated = 0;
29673deb3ec6SMatthias Ringwald                             sm_conn->sm_connection_authorization_state = AUTHORIZATION_UNKNOWN;
29683deb3ec6SMatthias Ringwald                             sm_conn->sm_le_db_index = -1;
29693deb3ec6SMatthias Ringwald 
29703deb3ec6SMatthias Ringwald                             // prepare CSRK lookup (does not involve setup)
29713deb3ec6SMatthias Ringwald                             sm_conn->sm_irk_lookup_state = IRK_LOOKUP_W4_READY;
29723deb3ec6SMatthias Ringwald 
29733deb3ec6SMatthias Ringwald                             // just connected -> everything else happens in sm_run()
29743deb3ec6SMatthias Ringwald                             if (sm_conn->sm_role){
29753deb3ec6SMatthias Ringwald                                 // slave - state already could be SM_RESPONDER_SEND_SECURITY_REQUEST instead
29763deb3ec6SMatthias Ringwald                                 if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){
29773deb3ec6SMatthias Ringwald                                     if (sm_slave_request_security) {
29783deb3ec6SMatthias Ringwald                                         // request security if requested by app
29793deb3ec6SMatthias Ringwald                                         sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST;
29803deb3ec6SMatthias Ringwald                                     } else {
29813deb3ec6SMatthias Ringwald                                         // otherwise, wait for pairing request
29823deb3ec6SMatthias Ringwald                                         sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
29833deb3ec6SMatthias Ringwald                                     }
29843deb3ec6SMatthias Ringwald                                 }
29853deb3ec6SMatthias Ringwald                                 break;
29863deb3ec6SMatthias Ringwald                             } else {
29873deb3ec6SMatthias Ringwald                                 // master
29883deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
29893deb3ec6SMatthias Ringwald                             }
29903deb3ec6SMatthias Ringwald                             break;
29913deb3ec6SMatthias Ringwald 
29923deb3ec6SMatthias Ringwald                         case HCI_SUBEVENT_LE_LONG_TERM_KEY_REQUEST:
2993711e6c80SMatthias Ringwald                             con_handle = little_endian_read_16(packet, 3);
2994711e6c80SMatthias Ringwald                             sm_conn = sm_get_connection_for_handle(con_handle);
29953deb3ec6SMatthias Ringwald                             if (!sm_conn) break;
29963deb3ec6SMatthias Ringwald 
29973deb3ec6SMatthias Ringwald                             log_info("LTK Request: state %u", sm_conn->sm_engine_state);
29983deb3ec6SMatthias Ringwald                             if (sm_conn->sm_engine_state == SM_RESPONDER_PH2_W4_LTK_REQUEST){
29993deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH2_CALC_STK;
30003deb3ec6SMatthias Ringwald                                 break;
30013deb3ec6SMatthias Ringwald                             }
3002c6b7cbd9SMatthias Ringwald                             if (sm_conn->sm_engine_state == SM_SC_W4_LTK_REQUEST_SC){
3003778b6aadSMatthias Ringwald                                 // PH2 SEND LTK as we need to exchange keys in PH3
3004778b6aadSMatthias Ringwald                                 sm_conn->sm_engine_state = SM_RESPONDER_PH2_SEND_LTK_REPLY;
3005e53be891SMatthias Ringwald                                 break;
3006e53be891SMatthias Ringwald                             }
30073deb3ec6SMatthias Ringwald 
30083deb3ec6SMatthias Ringwald                             // store rand and ediv
30099c80e4ccSMatthias Ringwald                             reverse_64(&packet[5], sm_conn->sm_local_rand);
3010f8fbdce0SMatthias Ringwald                             sm_conn->sm_local_ediv = little_endian_read_16(packet, 13);
3011549ad5d2SMatthias Ringwald 
3012549ad5d2SMatthias Ringwald                             // For Legacy Pairing (<=> EDIV != 0 || RAND != NULL), we need to recalculated our LTK as a
3013549ad5d2SMatthias Ringwald                             // potentially stored LTK is from the master
3014549ad5d2SMatthias Ringwald                             if (sm_conn->sm_local_ediv != 0 || !sm_is_null_random(sm_conn->sm_local_rand)){
301506cd539fSMatthias Ringwald                                 sm_conn->sm_engine_state = SM_RESPONDER_PH0_RECEIVED_LTK_REQUEST;
3016549ad5d2SMatthias Ringwald                                 break;
3017549ad5d2SMatthias Ringwald                             }
3018549ad5d2SMatthias Ringwald 
3019549ad5d2SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
302006cd539fSMatthias Ringwald                             sm_conn->sm_engine_state = SM_SC_RECEIVED_LTK_REQUEST;
3021549ad5d2SMatthias Ringwald #else
3022549ad5d2SMatthias Ringwald                             log_info("LTK Request: ediv & random are empty, but LE Secure Connections not supported");
3023549ad5d2SMatthias Ringwald                             sm_conn->sm_engine_state = SM_RESPONDER_PH0_SEND_LTK_REQUESTED_NEGATIVE_REPLY;
3024549ad5d2SMatthias Ringwald #endif
30253deb3ec6SMatthias Ringwald                             break;
3026804d3e67SMatthias Ringwald 
3027804d3e67SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
302809e4d397SMatthias Ringwald                         case HCI_SUBEVENT_LE_READ_LOCAL_P256_PUBLIC_KEY_COMPLETE:
302909e4d397SMatthias Ringwald                             if (hci_subevent_le_read_local_p256_public_key_complete_get_status(packet)){
303009e4d397SMatthias Ringwald                                 log_error("Read Local P256 Public Key failed");
303109e4d397SMatthias Ringwald                                 break;
303209e4d397SMatthias Ringwald                             }
303309e4d397SMatthias Ringwald                             hci_subevent_le_read_local_p256_public_key_complete_get_dhkey_x(packet, ec_qx);
303409e4d397SMatthias Ringwald                             hci_subevent_le_read_local_p256_public_key_complete_get_dhkey_y(packet, ec_qy);
303509e4d397SMatthias Ringwald                             ec_key_generation_state = EC_KEY_GENERATION_DONE;
303609e4d397SMatthias Ringwald                             sm_log_ec_keypair();
303709e4d397SMatthias Ringwald                             break;
3038804d3e67SMatthias Ringwald #endif
30393deb3ec6SMatthias Ringwald                         default:
30403deb3ec6SMatthias Ringwald                             break;
30413deb3ec6SMatthias Ringwald                     }
30423deb3ec6SMatthias Ringwald                     break;
30433deb3ec6SMatthias Ringwald 
30443deb3ec6SMatthias Ringwald                 case HCI_EVENT_ENCRYPTION_CHANGE:
3045711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3046711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
30473deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
30483deb3ec6SMatthias Ringwald 
30493deb3ec6SMatthias Ringwald                     sm_conn->sm_connection_encrypted = packet[5];
30503deb3ec6SMatthias Ringwald                     log_info("Encryption state change: %u, key size %u", sm_conn->sm_connection_encrypted,
30513deb3ec6SMatthias Ringwald                         sm_conn->sm_actual_encryption_key_size);
30523deb3ec6SMatthias Ringwald                     log_info("event handler, state %u", sm_conn->sm_engine_state);
30533deb3ec6SMatthias Ringwald                     if (!sm_conn->sm_connection_encrypted) break;
30543deb3ec6SMatthias Ringwald                     // continue if part of initial pairing
30553deb3ec6SMatthias Ringwald                     switch (sm_conn->sm_engine_state){
30563deb3ec6SMatthias Ringwald                         case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED:
30573deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
30583deb3ec6SMatthias Ringwald                             sm_done_for_handle(sm_conn->sm_handle);
30593deb3ec6SMatthias Ringwald                             break;
30603deb3ec6SMatthias Ringwald                         case SM_PH2_W4_CONNECTION_ENCRYPTED:
30613deb3ec6SMatthias Ringwald                             if (sm_conn->sm_role){
30623deb3ec6SMatthias Ringwald                                 // slave
3063bbf8db22SMatthias Ringwald                                 if (setup->sm_use_secure_connections){
3064bbf8db22SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
3065bbf8db22SMatthias Ringwald                                 } else {
30663deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
3067bbf8db22SMatthias Ringwald                                 }
30683deb3ec6SMatthias Ringwald                             } else {
30693deb3ec6SMatthias Ringwald                                 // master
30703deb3ec6SMatthias Ringwald                                 if (sm_key_distribution_all_received(sm_conn)){
30713deb3ec6SMatthias Ringwald                                     // skip receiving keys as there are none
30723deb3ec6SMatthias Ringwald                                     sm_key_distribution_handle_all_received(sm_conn);
30733deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
30743deb3ec6SMatthias Ringwald                                 } else {
30753deb3ec6SMatthias Ringwald                                     sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS;
30763deb3ec6SMatthias Ringwald                                 }
30773deb3ec6SMatthias Ringwald                             }
30783deb3ec6SMatthias Ringwald                             break;
30793deb3ec6SMatthias Ringwald                         default:
30803deb3ec6SMatthias Ringwald                             break;
30813deb3ec6SMatthias Ringwald                     }
30823deb3ec6SMatthias Ringwald                     break;
30833deb3ec6SMatthias Ringwald 
30843deb3ec6SMatthias Ringwald                 case HCI_EVENT_ENCRYPTION_KEY_REFRESH_COMPLETE:
3085711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3086711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
30873deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
30883deb3ec6SMatthias Ringwald 
30893deb3ec6SMatthias Ringwald                     log_info("Encryption key refresh complete, key size %u", sm_conn->sm_actual_encryption_key_size);
30903deb3ec6SMatthias Ringwald                     log_info("event handler, state %u", sm_conn->sm_engine_state);
30913deb3ec6SMatthias Ringwald                     // continue if part of initial pairing
30923deb3ec6SMatthias Ringwald                     switch (sm_conn->sm_engine_state){
30933deb3ec6SMatthias Ringwald                         case SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED:
30943deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_CONNECTED;
30953deb3ec6SMatthias Ringwald                             sm_done_for_handle(sm_conn->sm_handle);
30963deb3ec6SMatthias Ringwald                             break;
30973deb3ec6SMatthias Ringwald                         case SM_PH2_W4_CONNECTION_ENCRYPTED:
30983deb3ec6SMatthias Ringwald                             if (sm_conn->sm_role){
30993deb3ec6SMatthias Ringwald                                 // slave
31003deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
31013deb3ec6SMatthias Ringwald                             } else {
31023deb3ec6SMatthias Ringwald                                 // master
31033deb3ec6SMatthias Ringwald                                 sm_conn->sm_engine_state = SM_PH3_RECEIVE_KEYS;
31043deb3ec6SMatthias Ringwald                             }
31053deb3ec6SMatthias Ringwald                             break;
31063deb3ec6SMatthias Ringwald                         default:
31073deb3ec6SMatthias Ringwald                             break;
31083deb3ec6SMatthias Ringwald                     }
31093deb3ec6SMatthias Ringwald                     break;
31103deb3ec6SMatthias Ringwald 
31113deb3ec6SMatthias Ringwald 
31123deb3ec6SMatthias Ringwald                 case HCI_EVENT_DISCONNECTION_COMPLETE:
3113711e6c80SMatthias Ringwald                     con_handle = little_endian_read_16(packet, 3);
3114711e6c80SMatthias Ringwald                     sm_done_for_handle(con_handle);
3115711e6c80SMatthias Ringwald                     sm_conn = sm_get_connection_for_handle(con_handle);
31163deb3ec6SMatthias Ringwald                     if (!sm_conn) break;
31173deb3ec6SMatthias Ringwald 
31183deb3ec6SMatthias Ringwald                     // delete stored bonding on disconnect with authentication failure in ph0
31193deb3ec6SMatthias Ringwald                     if (sm_conn->sm_role == 0
31203deb3ec6SMatthias Ringwald                         && sm_conn->sm_engine_state == SM_INITIATOR_PH0_W4_CONNECTION_ENCRYPTED
31213deb3ec6SMatthias Ringwald                         && packet[2] == ERROR_CODE_AUTHENTICATION_FAILURE){
31223deb3ec6SMatthias Ringwald                         le_device_db_remove(sm_conn->sm_le_db_index);
31233deb3ec6SMatthias Ringwald                     }
31243deb3ec6SMatthias Ringwald 
31253deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_GENERAL_IDLE;
31263deb3ec6SMatthias Ringwald                     sm_conn->sm_handle = 0;
31273deb3ec6SMatthias Ringwald                     break;
31283deb3ec6SMatthias Ringwald 
31293deb3ec6SMatthias Ringwald 				case HCI_EVENT_COMMAND_COMPLETE:
3130073bd0faSMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_encrypt)){
31313deb3ec6SMatthias Ringwald                         sm_handle_encryption_result(&packet[6]);
31323deb3ec6SMatthias Ringwald                         break;
31333deb3ec6SMatthias Ringwald                     }
3134073bd0faSMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_le_rand)){
31353deb3ec6SMatthias Ringwald                         sm_handle_random_result(&packet[6]);
31363deb3ec6SMatthias Ringwald                         break;
31373deb3ec6SMatthias Ringwald                     }
313833373e40SMatthias Ringwald                     if (HCI_EVENT_IS_COMMAND_COMPLETE(packet, hci_read_bd_addr)){
313933373e40SMatthias Ringwald                         // Hack for Nordic nRF5 series that doesn't have public address:
314033373e40SMatthias Ringwald                         // - with patches from port/nrf5-zephyr, hci_read_bd_addr returns random static address
314133373e40SMatthias Ringwald                         // - we use this as default for advertisements/connections
314233373e40SMatthias Ringwald                         if (hci_get_manufacturer() == COMPANY_ID_NORDIC_SEMICONDUCTOR_ASA){
314333373e40SMatthias Ringwald                             log_info("nRF5: using (fake) public address as random static address");
314433373e40SMatthias Ringwald                             bd_addr_t addr;
314533373e40SMatthias Ringwald                             reverse_bd_addr(&packet[OFFSET_OF_DATA_IN_COMMAND_COMPLETE + 1], addr);
314633373e40SMatthias Ringwald                             gap_random_address_set(addr);
314733373e40SMatthias Ringwald                         }
314833373e40SMatthias Ringwald                     }
314965b44ffdSMatthias Ringwald                     break;
315065b44ffdSMatthias Ringwald                 default:
315165b44ffdSMatthias Ringwald                     break;
31523deb3ec6SMatthias Ringwald 			}
315365b44ffdSMatthias Ringwald             break;
315465b44ffdSMatthias Ringwald         default:
315565b44ffdSMatthias Ringwald             break;
31563deb3ec6SMatthias Ringwald 	}
31573deb3ec6SMatthias Ringwald 
31583deb3ec6SMatthias Ringwald     sm_run();
31593deb3ec6SMatthias Ringwald }
31603deb3ec6SMatthias Ringwald 
31613deb3ec6SMatthias Ringwald static inline int sm_calc_actual_encryption_key_size(int other){
31623deb3ec6SMatthias Ringwald     if (other < sm_min_encryption_key_size) return 0;
31633deb3ec6SMatthias Ringwald     if (other < sm_max_encryption_key_size) return other;
31643deb3ec6SMatthias Ringwald     return sm_max_encryption_key_size;
31653deb3ec6SMatthias Ringwald }
31663deb3ec6SMatthias Ringwald 
3167945888f5SMatthias Ringwald 
316831c09488SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3169945888f5SMatthias Ringwald static int sm_just_works_or_numeric_comparison(stk_generation_method_t method){
3170945888f5SMatthias Ringwald     switch (method){
3171945888f5SMatthias Ringwald         case JUST_WORKS:
3172945888f5SMatthias Ringwald         case NK_BOTH_INPUT:
3173945888f5SMatthias Ringwald             return 1;
3174945888f5SMatthias Ringwald         default:
3175945888f5SMatthias Ringwald             return 0;
3176945888f5SMatthias Ringwald     }
3177945888f5SMatthias Ringwald }
317807036a04SMatthias Ringwald // responder
3179945888f5SMatthias Ringwald 
3180688a08f9SMatthias Ringwald static int sm_passkey_used(stk_generation_method_t method){
3181688a08f9SMatthias Ringwald     switch (method){
3182688a08f9SMatthias Ringwald         case PK_RESP_INPUT:
3183688a08f9SMatthias Ringwald             return 1;
3184688a08f9SMatthias Ringwald         default:
3185688a08f9SMatthias Ringwald             return 0;
3186688a08f9SMatthias Ringwald     }
3187688a08f9SMatthias Ringwald }
318831c09488SMatthias Ringwald #endif
3189688a08f9SMatthias Ringwald 
31903deb3ec6SMatthias Ringwald /**
31913deb3ec6SMatthias Ringwald  * @return ok
31923deb3ec6SMatthias Ringwald  */
31933deb3ec6SMatthias Ringwald static int sm_validate_stk_generation_method(void){
31943deb3ec6SMatthias Ringwald     // check if STK generation method is acceptable by client
31953deb3ec6SMatthias Ringwald     switch (setup->sm_stk_generation_method){
31963deb3ec6SMatthias Ringwald         case JUST_WORKS:
31973deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_JUST_WORKS) != 0;
31983deb3ec6SMatthias Ringwald         case PK_RESP_INPUT:
31993deb3ec6SMatthias Ringwald         case PK_INIT_INPUT:
32003deb3ec6SMatthias Ringwald         case OK_BOTH_INPUT:
32013deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_PASSKEY) != 0;
32023deb3ec6SMatthias Ringwald         case OOB:
32033deb3ec6SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_OOB) != 0;
3204446a8c36SMatthias Ringwald         case NK_BOTH_INPUT:
3205b4343428SMatthias Ringwald             return (sm_accepted_stk_generation_methods & SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON) != 0;
3206446a8c36SMatthias Ringwald             return 1;
32073deb3ec6SMatthias Ringwald         default:
32083deb3ec6SMatthias Ringwald             return 0;
32093deb3ec6SMatthias Ringwald     }
32103deb3ec6SMatthias Ringwald }
32113deb3ec6SMatthias Ringwald 
3212711e6c80SMatthias Ringwald static void sm_pdu_handler(uint8_t packet_type, hci_con_handle_t con_handle, uint8_t *packet, uint16_t size){
32133deb3ec6SMatthias Ringwald 
32149ec2630cSMatthias Ringwald     UNUSED(size);
32159ec2630cSMatthias Ringwald 
3216b170b20fSMatthias Ringwald     if (packet_type == HCI_EVENT_PACKET && packet[0] == L2CAP_EVENT_CAN_SEND_NOW){
3217b170b20fSMatthias Ringwald         sm_run();
3218b170b20fSMatthias Ringwald     }
3219b170b20fSMatthias Ringwald 
32203deb3ec6SMatthias Ringwald     if (packet_type != SM_DATA_PACKET) return;
32213deb3ec6SMatthias Ringwald 
3222711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
32233deb3ec6SMatthias Ringwald     if (!sm_conn) return;
32243deb3ec6SMatthias Ringwald 
32253deb3ec6SMatthias Ringwald     if (packet[0] == SM_CODE_PAIRING_FAILED){
32263deb3ec6SMatthias Ringwald         sm_conn->sm_engine_state = sm_conn->sm_role ? SM_RESPONDER_IDLE : SM_INITIATOR_CONNECTED;
32273deb3ec6SMatthias Ringwald         return;
32283deb3ec6SMatthias Ringwald     }
32293deb3ec6SMatthias Ringwald 
3230e03e489aSMatthias Ringwald     log_debug("sm_pdu_handler: state %u, pdu 0x%02x", sm_conn->sm_engine_state, packet[0]);
32313deb3ec6SMatthias Ringwald 
32323deb3ec6SMatthias Ringwald     int err;
32333deb3ec6SMatthias Ringwald 
32343d7fe1e9SMatthias Ringwald     if (packet[0] == SM_CODE_KEYPRESS_NOTIFICATION){
32353d7fe1e9SMatthias Ringwald         uint8_t buffer[5];
32363d7fe1e9SMatthias Ringwald         buffer[0] = SM_EVENT_KEYPRESS_NOTIFICATION;
32373d7fe1e9SMatthias Ringwald         buffer[1] = 3;
32383d7fe1e9SMatthias Ringwald         little_endian_store_16(buffer, 2, con_handle);
32393d7fe1e9SMatthias Ringwald         buffer[4] = packet[1];
32403d7fe1e9SMatthias Ringwald         sm_dispatch_event(HCI_EVENT_PACKET, 0, buffer, sizeof(buffer));
32413d7fe1e9SMatthias Ringwald         return;
32423d7fe1e9SMatthias Ringwald     }
32433d7fe1e9SMatthias Ringwald 
32443deb3ec6SMatthias Ringwald     switch (sm_conn->sm_engine_state){
32453deb3ec6SMatthias Ringwald 
32463deb3ec6SMatthias Ringwald         // a sm timeout requries a new physical connection
32473deb3ec6SMatthias Ringwald         case SM_GENERAL_TIMEOUT:
32483deb3ec6SMatthias Ringwald             return;
32493deb3ec6SMatthias Ringwald 
32503deb3ec6SMatthias Ringwald         // Initiator
32513deb3ec6SMatthias Ringwald         case SM_INITIATOR_CONNECTED:
32523deb3ec6SMatthias Ringwald             if ((packet[0] != SM_CODE_SECURITY_REQUEST) || (sm_conn->sm_role)){
32533deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
32543deb3ec6SMatthias Ringwald                 break;
32553deb3ec6SMatthias Ringwald             }
32563deb3ec6SMatthias Ringwald             if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_FAILED){
32573deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
32583deb3ec6SMatthias Ringwald                 break;
32593deb3ec6SMatthias Ringwald             }
32603deb3ec6SMatthias Ringwald             if (sm_conn->sm_irk_lookup_state == IRK_LOOKUP_SUCCEEDED){
32613764b551SMatthias Ringwald                 sm_key_t ltk;
326259066796SMatthias Ringwald                 le_device_db_encryption_get(sm_conn->sm_le_db_index, NULL, NULL, ltk, NULL, NULL, NULL);
326359066796SMatthias Ringwald                 if (!sm_is_null_key(ltk)){
32643deb3ec6SMatthias Ringwald                     log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index);
32653deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
32663deb3ec6SMatthias Ringwald                 } else {
32673deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
32683deb3ec6SMatthias Ringwald                 }
32693deb3ec6SMatthias Ringwald                 break;
32703deb3ec6SMatthias Ringwald             }
32713deb3ec6SMatthias Ringwald             // otherwise, store security request
32723deb3ec6SMatthias Ringwald             sm_conn->sm_security_request_received = 1;
32733deb3ec6SMatthias Ringwald             break;
32743deb3ec6SMatthias Ringwald 
32753deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH1_W4_PAIRING_RESPONSE:
32763deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RESPONSE){
32773deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
32783deb3ec6SMatthias Ringwald                 break;
32793deb3ec6SMatthias Ringwald             }
32803deb3ec6SMatthias Ringwald             // store pairing request
32813deb3ec6SMatthias Ringwald             memcpy(&setup->sm_s_pres, packet, sizeof(sm_pairing_packet_t));
32823deb3ec6SMatthias Ringwald             err = sm_stk_generation_init(sm_conn);
32833deb3ec6SMatthias Ringwald             if (err){
32843deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = err;
32853deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
32863deb3ec6SMatthias Ringwald                 break;
32873deb3ec6SMatthias Ringwald             }
3288b41539d5SMatthias Ringwald 
3289b41539d5SMatthias Ringwald             // generate random number first, if we need to show passkey
3290b41539d5SMatthias Ringwald             if (setup->sm_stk_generation_method == PK_RESP_INPUT){
3291b41539d5SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH2_GET_RANDOM_TK;
3292b41539d5SMatthias Ringwald                 break;
3293b41539d5SMatthias Ringwald             }
3294b41539d5SMatthias Ringwald 
3295136d331aSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3296136d331aSMatthias Ringwald             if (setup->sm_use_secure_connections){
32978cba5ca3SMatthias Ringwald                 // SC Numeric Comparison will trigger user response after public keys & nonces have been exchanged
32988cba5ca3SMatthias Ringwald                 if (setup->sm_stk_generation_method == JUST_WORKS){
3299136d331aSMatthias Ringwald                     sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
3300136d331aSMatthias Ringwald                     sm_trigger_user_response(sm_conn);
3301136d331aSMatthias Ringwald                     if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
3302c6b7cbd9SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3303136d331aSMatthias Ringwald                     }
33048cba5ca3SMatthias Ringwald                 } else {
3305c6b7cbd9SMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
33068cba5ca3SMatthias Ringwald                 }
3307136d331aSMatthias Ringwald                 break;
3308136d331aSMatthias Ringwald             }
3309136d331aSMatthias Ringwald #endif
33103deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
33113deb3ec6SMatthias Ringwald             sm_trigger_user_response(sm_conn);
33123deb3ec6SMatthias Ringwald             // response_idle == nothing <--> sm_trigger_user_response() did not require response
33133deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_IDLE){
33143deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
33153deb3ec6SMatthias Ringwald             }
33163deb3ec6SMatthias Ringwald             break;
33173deb3ec6SMatthias Ringwald 
33183deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH2_W4_PAIRING_CONFIRM:
33193deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
33203deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33213deb3ec6SMatthias Ringwald                 break;
33223deb3ec6SMatthias Ringwald             }
33233deb3ec6SMatthias Ringwald 
33243deb3ec6SMatthias Ringwald             // store s_confirm
33259c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
33263deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_SEND_PAIRING_RANDOM;
33273deb3ec6SMatthias Ringwald             break;
33283deb3ec6SMatthias Ringwald 
33293deb3ec6SMatthias Ringwald         case SM_INITIATOR_PH2_W4_PAIRING_RANDOM:
33303deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
33313deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33323deb3ec6SMatthias Ringwald                 break;;
33333deb3ec6SMatthias Ringwald             }
33343deb3ec6SMatthias Ringwald 
33353deb3ec6SMatthias Ringwald             // received random value
33369c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_random);
33373deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C;
33383deb3ec6SMatthias Ringwald             break;
33393deb3ec6SMatthias Ringwald 
33403deb3ec6SMatthias Ringwald         // Responder
33413deb3ec6SMatthias Ringwald         case SM_RESPONDER_IDLE:
33423deb3ec6SMatthias Ringwald         case SM_RESPONDER_SEND_SECURITY_REQUEST:
33433deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH1_W4_PAIRING_REQUEST:
33443deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_REQUEST){
33453deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
33463deb3ec6SMatthias Ringwald                 break;;
33473deb3ec6SMatthias Ringwald             }
33483deb3ec6SMatthias Ringwald 
33493deb3ec6SMatthias Ringwald             // store pairing request
33503deb3ec6SMatthias Ringwald             memcpy(&sm_conn->sm_m_preq, packet, sizeof(sm_pairing_packet_t));
33513deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_RESPONDER_PH1_PAIRING_REQUEST_RECEIVED;
33523deb3ec6SMatthias Ringwald             break;
33533deb3ec6SMatthias Ringwald 
335427c32905SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3355c6b7cbd9SMatthias Ringwald         case SM_SC_W4_PUBLIC_KEY_COMMAND:
335627c32905SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_PUBLIC_KEY){
335727c32905SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
335827c32905SMatthias Ringwald                 break;
335927c32905SMatthias Ringwald             }
3360bccf5e67SMatthias Ringwald 
3361e53be891SMatthias Ringwald             // store public key for DH Key calculation
3362e53be891SMatthias Ringwald             reverse_256(&packet[01], setup->sm_peer_qx);
3363e53be891SMatthias Ringwald             reverse_256(&packet[33], setup->sm_peer_qy);
3364bccf5e67SMatthias Ringwald 
3365bccf5e67SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
3366bccf5e67SMatthias Ringwald             // validate public key
3367bccf5e67SMatthias Ringwald             mbedtls_ecp_point Q;
3368bccf5e67SMatthias Ringwald             mbedtls_ecp_point_init( &Q );
3369bccf5e67SMatthias Ringwald             mbedtls_mpi_read_binary(&Q.X, setup->sm_peer_qx, 32);
3370bccf5e67SMatthias Ringwald             mbedtls_mpi_read_binary(&Q.Y, setup->sm_peer_qy, 32);
3371ae4aa2b6SMatthias Ringwald             mbedtls_mpi_lset(&Q.Z, 1);
3372e722521aSMatthias Ringwald             err = mbedtls_ecp_check_pubkey(&mbedtls_ec_group, &Q);
3373891bb64aSMatthias Ringwald             mbedtls_ecp_point_free( & Q);
3374bccf5e67SMatthias Ringwald             if (err){
3375bccf5e67SMatthias Ringwald                 log_error("sm: peer public key invalid %x", err);
3376bccf5e67SMatthias Ringwald                 // uses "unspecified reason", there is no "public key invalid" error code
3377bccf5e67SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3378bccf5e67SMatthias Ringwald                 break;
3379bccf5e67SMatthias Ringwald             }
3380891bb64aSMatthias Ringwald 
3381bccf5e67SMatthias Ringwald #endif
3382136d331aSMatthias Ringwald             if (sm_conn->sm_role){
3383136d331aSMatthias Ringwald                 // responder
3384c6b7cbd9SMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3385136d331aSMatthias Ringwald             } else {
3386136d331aSMatthias Ringwald                 // initiator
3387a1e31e9cSMatthias Ringwald                 // stk generation method
3388a1e31e9cSMatthias Ringwald                 // passkey entry: notify app to show passkey or to request passkey
3389a1e31e9cSMatthias Ringwald                 switch (setup->sm_stk_generation_method){
3390a1e31e9cSMatthias Ringwald                     case JUST_WORKS:
3391a1e31e9cSMatthias Ringwald                     case NK_BOTH_INPUT:
3392c6b7cbd9SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W4_CONFIRMATION;
3393a1e31e9cSMatthias Ringwald                         break;
3394a1e31e9cSMatthias Ringwald                     case PK_RESP_INPUT:
339507036a04SMatthias Ringwald                         sm_sc_start_calculating_local_confirm(sm_conn);
339607036a04SMatthias Ringwald                         break;
339707036a04SMatthias Ringwald                     case PK_INIT_INPUT:
3398a1e31e9cSMatthias Ringwald                     case OK_BOTH_INPUT:
339907036a04SMatthias Ringwald                         if (setup->sm_user_response != SM_USER_RESPONSE_PASSKEY){
340007036a04SMatthias Ringwald                             sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
340107036a04SMatthias Ringwald                             break;
340207036a04SMatthias Ringwald                         }
3403b35a3de2SMatthias Ringwald                         sm_sc_start_calculating_local_confirm(sm_conn);
3404a1e31e9cSMatthias Ringwald                         break;
3405a1e31e9cSMatthias Ringwald                     case OOB:
3406a1e31e9cSMatthias Ringwald                         // TODO: implement SC OOB
3407a1e31e9cSMatthias Ringwald                         break;
3408a1e31e9cSMatthias Ringwald                 }
3409136d331aSMatthias Ringwald             }
341027c32905SMatthias Ringwald             break;
3411e53be891SMatthias Ringwald 
3412c6b7cbd9SMatthias Ringwald         case SM_SC_W4_CONFIRMATION:
341345a61d50SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
341445a61d50SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
341545a61d50SMatthias Ringwald                 break;
341645a61d50SMatthias Ringwald             }
341745a61d50SMatthias Ringwald             // received confirm value
341845a61d50SMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
341945a61d50SMatthias Ringwald 
342045a61d50SMatthias Ringwald             if (sm_conn->sm_role){
342145a61d50SMatthias Ringwald                 // responder
342207036a04SMatthias Ringwald                 if (sm_passkey_used(setup->sm_stk_generation_method)){
342307036a04SMatthias Ringwald                     if (setup->sm_user_response != SM_USER_RESPONSE_PASSKEY){
342407036a04SMatthias Ringwald                         // still waiting for passkey
342507036a04SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W4_USER_RESPONSE;
342607036a04SMatthias Ringwald                         break;
342707036a04SMatthias Ringwald                     }
342807036a04SMatthias Ringwald                 }
3429b35a3de2SMatthias Ringwald                 sm_sc_start_calculating_local_confirm(sm_conn);
343045a61d50SMatthias Ringwald             } else {
343145a61d50SMatthias Ringwald                 // initiator
3432945888f5SMatthias Ringwald                 if (sm_just_works_or_numeric_comparison(setup->sm_stk_generation_method)){
3433f1c1783eSMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_W2_GET_RANDOM_A;
3434f1c1783eSMatthias Ringwald                 } else {
3435c6b7cbd9SMatthias Ringwald                     sm_conn->sm_engine_state = SM_SC_SEND_PAIRING_RANDOM;
343645a61d50SMatthias Ringwald                 }
3437f1c1783eSMatthias Ringwald             }
343845a61d50SMatthias Ringwald             break;
343945a61d50SMatthias Ringwald 
3440c6b7cbd9SMatthias Ringwald         case SM_SC_W4_PAIRING_RANDOM:
3441e53be891SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
3442e53be891SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3443136d331aSMatthias Ringwald                 break;
3444e53be891SMatthias Ringwald             }
3445e53be891SMatthias Ringwald 
3446e53be891SMatthias Ringwald             // received random value
3447e53be891SMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_nonce);
3448e53be891SMatthias Ringwald 
34495a293e6eSMatthias Ringwald             // validate confirm value if Cb = f4(Pkb, Pka, Nb, z)
34505a293e6eSMatthias Ringwald             // only check for JUST WORK/NC in initiator role AND passkey entry
3451a3aba2f9SMatthias Ringwald             if (sm_conn->sm_role || sm_passkey_used(setup->sm_stk_generation_method)) {
3452688a08f9SMatthias Ringwald                  sm_conn->sm_engine_state = SM_SC_W2_CMAC_FOR_CHECK_CONFIRMATION;
34535a293e6eSMatthias Ringwald             }
34546f52a196SMatthias Ringwald 
3455688a08f9SMatthias Ringwald             sm_sc_state_after_receiving_random(sm_conn);
3456e53be891SMatthias Ringwald             break;
3457e53be891SMatthias Ringwald 
3458901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_G2:
3459901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_G2:
3460901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_SALT:
3461901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_SALT:
3462901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_MACKEY:
3463901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_MACKEY:
3464901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F5_LTK:
3465901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F5_LTK:
3466901c000fSMatthias Ringwald         case SM_SC_W2_CALCULATE_F6_FOR_DHKEY_CHECK:
3467c6b7cbd9SMatthias Ringwald         case SM_SC_W4_DHKEY_CHECK_COMMAND:
3468901c000fSMatthias Ringwald         case SM_SC_W4_CALCULATE_F6_FOR_DHKEY_CHECK:
3469e53be891SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_DHKEY_CHECK){
3470e53be891SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
3471e53be891SMatthias Ringwald                 break;
3472e53be891SMatthias Ringwald             }
3473e53be891SMatthias Ringwald             // store DHKey Check
3474901c000fSMatthias Ringwald             setup->sm_state_vars |= SM_STATE_VAR_DHKEY_COMMAND_RECEIVED;
3475e53be891SMatthias Ringwald             reverse_128(&packet[01], setup->sm_peer_dhkey_check);
3476446a8c36SMatthias Ringwald 
3477901c000fSMatthias Ringwald             // have we been only waiting for dhkey check command?
3478901c000fSMatthias Ringwald             if (sm_conn->sm_engine_state == SM_SC_W4_DHKEY_CHECK_COMMAND){
3479019005a0SMatthias Ringwald                 sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_F6_TO_VERIFY_DHKEY_CHECK;
3480bd57ffebSMatthias Ringwald             }
3481bd57ffebSMatthias Ringwald             break;
348227c32905SMatthias Ringwald #endif
348327c32905SMatthias Ringwald 
34843deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH1_W4_PAIRING_CONFIRM:
34853deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_CONFIRM){
34863deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
348727c32905SMatthias Ringwald                 break;
34883deb3ec6SMatthias Ringwald             }
34893deb3ec6SMatthias Ringwald 
34903deb3ec6SMatthias Ringwald             // received confirm value
34919c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_confirm);
34923deb3ec6SMatthias Ringwald 
34933deb3ec6SMatthias Ringwald             // notify client to hide shown passkey
34943deb3ec6SMatthias Ringwald             if (setup->sm_stk_generation_method == PK_INIT_INPUT){
34955611a760SMatthias 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);
34963deb3ec6SMatthias Ringwald             }
34973deb3ec6SMatthias Ringwald 
34983deb3ec6SMatthias Ringwald             // handle user cancel pairing?
34993deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_DECLINE){
35003deb3ec6SMatthias Ringwald                 setup->sm_pairing_failed_reason = SM_REASON_PASSKEYT_ENTRY_FAILED;
35013deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_GENERAL_SEND_PAIRING_FAILED;
35023deb3ec6SMatthias Ringwald                 break;
35033deb3ec6SMatthias Ringwald             }
35043deb3ec6SMatthias Ringwald 
35053deb3ec6SMatthias Ringwald             // wait for user action?
35063deb3ec6SMatthias Ringwald             if (setup->sm_user_response == SM_USER_RESPONSE_PENDING){
35073deb3ec6SMatthias Ringwald                 sm_conn->sm_engine_state = SM_PH1_W4_USER_RESPONSE;
35083deb3ec6SMatthias Ringwald                 break;
35093deb3ec6SMatthias Ringwald             }
35103deb3ec6SMatthias Ringwald 
35113deb3ec6SMatthias Ringwald             // calculate and send local_confirm
35123deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
35133deb3ec6SMatthias Ringwald             break;
35143deb3ec6SMatthias Ringwald 
35153deb3ec6SMatthias Ringwald         case SM_RESPONDER_PH2_W4_PAIRING_RANDOM:
35163deb3ec6SMatthias Ringwald             if (packet[0] != SM_CODE_PAIRING_RANDOM){
35173deb3ec6SMatthias Ringwald                 sm_pdu_received_in_wrong_state(sm_conn);
35183deb3ec6SMatthias Ringwald                 break;;
35193deb3ec6SMatthias Ringwald             }
35203deb3ec6SMatthias Ringwald 
35213deb3ec6SMatthias Ringwald             // received random value
35229c80e4ccSMatthias Ringwald             reverse_128(&packet[1], setup->sm_peer_random);
35233deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_ENC_C;
35243deb3ec6SMatthias Ringwald             break;
35253deb3ec6SMatthias Ringwald 
35263deb3ec6SMatthias Ringwald         case SM_PH3_RECEIVE_KEYS:
35273deb3ec6SMatthias Ringwald             switch(packet[0]){
35283deb3ec6SMatthias Ringwald                 case SM_CODE_ENCRYPTION_INFORMATION:
35293deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_ENCRYPTION_INFORMATION;
35309c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_ltk);
35313deb3ec6SMatthias Ringwald                     break;
35323deb3ec6SMatthias Ringwald 
35333deb3ec6SMatthias Ringwald                 case SM_CODE_MASTER_IDENTIFICATION:
35343deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_MASTER_IDENTIFICATION;
3535f8fbdce0SMatthias Ringwald                     setup->sm_peer_ediv = little_endian_read_16(packet, 1);
35369c80e4ccSMatthias Ringwald                     reverse_64(&packet[3], setup->sm_peer_rand);
35373deb3ec6SMatthias Ringwald                     break;
35383deb3ec6SMatthias Ringwald 
35393deb3ec6SMatthias Ringwald                 case SM_CODE_IDENTITY_INFORMATION:
35403deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_INFORMATION;
35419c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_irk);
35423deb3ec6SMatthias Ringwald                     break;
35433deb3ec6SMatthias Ringwald 
35443deb3ec6SMatthias Ringwald                 case SM_CODE_IDENTITY_ADDRESS_INFORMATION:
35453deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION;
35463deb3ec6SMatthias Ringwald                     setup->sm_peer_addr_type = packet[1];
3547724d70a2SMatthias Ringwald                     reverse_bd_addr(&packet[2], setup->sm_peer_address);
35483deb3ec6SMatthias Ringwald                     break;
35493deb3ec6SMatthias Ringwald 
35503deb3ec6SMatthias Ringwald                 case SM_CODE_SIGNING_INFORMATION:
35513deb3ec6SMatthias Ringwald                     setup->sm_key_distribution_received_set |= SM_KEYDIST_FLAG_SIGNING_IDENTIFICATION;
35529c80e4ccSMatthias Ringwald                     reverse_128(&packet[1], setup->sm_peer_csrk);
35533deb3ec6SMatthias Ringwald                     break;
35543deb3ec6SMatthias Ringwald                 default:
35553deb3ec6SMatthias Ringwald                     // Unexpected PDU
35563deb3ec6SMatthias Ringwald                     log_info("Unexpected PDU %u in SM_PH3_RECEIVE_KEYS", packet[0]);
35573deb3ec6SMatthias Ringwald                     break;
35583deb3ec6SMatthias Ringwald             }
35593deb3ec6SMatthias Ringwald             // done with key distribution?
35603deb3ec6SMatthias Ringwald             if (sm_key_distribution_all_received(sm_conn)){
35613deb3ec6SMatthias Ringwald 
35623deb3ec6SMatthias Ringwald                 sm_key_distribution_handle_all_received(sm_conn);
35633deb3ec6SMatthias Ringwald 
35643deb3ec6SMatthias Ringwald                 if (sm_conn->sm_role){
35652bacf595SMatthias Ringwald                     if (setup->sm_use_secure_connections && (setup->sm_key_distribution_received_set & SM_KEYDIST_FLAG_IDENTITY_ADDRESS_INFORMATION)){
35662bacf595SMatthias Ringwald                         sm_conn->sm_engine_state = SM_SC_W2_CALCULATE_H6_ILK;
35672bacf595SMatthias Ringwald                     } else {
35683deb3ec6SMatthias Ringwald                         sm_conn->sm_engine_state = SM_RESPONDER_IDLE;
35693deb3ec6SMatthias Ringwald                         sm_done_for_handle(sm_conn->sm_handle);
35702bacf595SMatthias Ringwald                     }
35713deb3ec6SMatthias Ringwald                 } else {
3572625f00b2SMatthias Ringwald                     if (setup->sm_use_secure_connections){
3573625f00b2SMatthias Ringwald                         sm_conn->sm_engine_state = SM_PH3_DISTRIBUTE_KEYS;
3574bbf8db22SMatthias Ringwald                     } else {
3575bbf8db22SMatthias Ringwald                         sm_conn->sm_engine_state = SM_PH3_GET_RANDOM;
3576625f00b2SMatthias Ringwald                     }
35773deb3ec6SMatthias Ringwald                 }
35783deb3ec6SMatthias Ringwald             }
35793deb3ec6SMatthias Ringwald             break;
35803deb3ec6SMatthias Ringwald         default:
35813deb3ec6SMatthias Ringwald             // Unexpected PDU
35823deb3ec6SMatthias Ringwald             log_info("Unexpected PDU %u in state %u", packet[0], sm_conn->sm_engine_state);
35833deb3ec6SMatthias Ringwald             break;
35843deb3ec6SMatthias Ringwald     }
35853deb3ec6SMatthias Ringwald 
35863deb3ec6SMatthias Ringwald     // try to send preparared packet
35873deb3ec6SMatthias Ringwald     sm_run();
35883deb3ec6SMatthias Ringwald }
35893deb3ec6SMatthias Ringwald 
35903deb3ec6SMatthias Ringwald // Security Manager Client API
35913deb3ec6SMatthias Ringwald void sm_register_oob_data_callback( int (*get_oob_data_callback)(uint8_t addres_type, bd_addr_t addr, uint8_t * oob_data)){
35923deb3ec6SMatthias Ringwald     sm_get_oob_data = get_oob_data_callback;
35933deb3ec6SMatthias Ringwald }
35943deb3ec6SMatthias Ringwald 
359589a78d34SMatthias Ringwald void sm_add_event_handler(btstack_packet_callback_registration_t * callback_handler){
359689a78d34SMatthias Ringwald     btstack_linked_list_add_tail(&sm_event_handlers, (btstack_linked_item_t*) callback_handler);
359789a78d34SMatthias Ringwald }
359889a78d34SMatthias Ringwald 
35993deb3ec6SMatthias Ringwald void sm_set_accepted_stk_generation_methods(uint8_t accepted_stk_generation_methods){
36003deb3ec6SMatthias Ringwald     sm_accepted_stk_generation_methods = accepted_stk_generation_methods;
36013deb3ec6SMatthias Ringwald }
36023deb3ec6SMatthias Ringwald 
36033deb3ec6SMatthias Ringwald void sm_set_encryption_key_size_range(uint8_t min_size, uint8_t max_size){
36043deb3ec6SMatthias Ringwald 	sm_min_encryption_key_size = min_size;
36053deb3ec6SMatthias Ringwald 	sm_max_encryption_key_size = max_size;
36063deb3ec6SMatthias Ringwald }
36073deb3ec6SMatthias Ringwald 
36083deb3ec6SMatthias Ringwald void sm_set_authentication_requirements(uint8_t auth_req){
36093deb3ec6SMatthias Ringwald     sm_auth_req = auth_req;
36103deb3ec6SMatthias Ringwald }
36113deb3ec6SMatthias Ringwald 
36123deb3ec6SMatthias Ringwald void sm_set_io_capabilities(io_capability_t io_capability){
36133deb3ec6SMatthias Ringwald     sm_io_capabilities = io_capability;
36143deb3ec6SMatthias Ringwald }
36153deb3ec6SMatthias Ringwald 
36163deb3ec6SMatthias Ringwald void sm_set_request_security(int enable){
36173deb3ec6SMatthias Ringwald     sm_slave_request_security = enable;
36183deb3ec6SMatthias Ringwald }
36193deb3ec6SMatthias Ringwald 
36203deb3ec6SMatthias Ringwald void sm_set_er(sm_key_t er){
36213deb3ec6SMatthias Ringwald     memcpy(sm_persistent_er, er, 16);
36223deb3ec6SMatthias Ringwald }
36233deb3ec6SMatthias Ringwald 
36243deb3ec6SMatthias Ringwald void sm_set_ir(sm_key_t ir){
36253deb3ec6SMatthias Ringwald     memcpy(sm_persistent_ir, ir, 16);
36263deb3ec6SMatthias Ringwald }
36273deb3ec6SMatthias Ringwald 
36283deb3ec6SMatthias Ringwald // Testing support only
36293deb3ec6SMatthias Ringwald void sm_test_set_irk(sm_key_t irk){
36303deb3ec6SMatthias Ringwald     memcpy(sm_persistent_irk, irk, 16);
36313deb3ec6SMatthias Ringwald     sm_persistent_irk_ready = 1;
36323deb3ec6SMatthias Ringwald }
36333deb3ec6SMatthias Ringwald 
36343deb3ec6SMatthias Ringwald void sm_test_use_fixed_local_csrk(void){
36353deb3ec6SMatthias Ringwald     test_use_fixed_local_csrk = 1;
36363deb3ec6SMatthias Ringwald }
36373deb3ec6SMatthias Ringwald 
36383deb3ec6SMatthias Ringwald void sm_init(void){
36393deb3ec6SMatthias Ringwald     // set some (BTstack default) ER and IR
36403deb3ec6SMatthias Ringwald     int i;
36413deb3ec6SMatthias Ringwald     sm_key_t er;
36423deb3ec6SMatthias Ringwald     sm_key_t ir;
36433deb3ec6SMatthias Ringwald     for (i=0;i<16;i++){
36443deb3ec6SMatthias Ringwald         er[i] = 0x30 + i;
36453deb3ec6SMatthias Ringwald         ir[i] = 0x90 + i;
36463deb3ec6SMatthias Ringwald     }
36473deb3ec6SMatthias Ringwald     sm_set_er(er);
36483deb3ec6SMatthias Ringwald     sm_set_ir(ir);
36493deb3ec6SMatthias Ringwald     // defaults
36503deb3ec6SMatthias Ringwald     sm_accepted_stk_generation_methods = SM_STK_GENERATION_METHOD_JUST_WORKS
36513deb3ec6SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_OOB
3652b4343428SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_PASSKEY
3653b4343428SMatthias Ringwald                                        | SM_STK_GENERATION_METHOD_NUMERIC_COMPARISON;
3654b4343428SMatthias Ringwald 
36553deb3ec6SMatthias Ringwald     sm_max_encryption_key_size = 16;
36563deb3ec6SMatthias Ringwald     sm_min_encryption_key_size = 7;
36573deb3ec6SMatthias Ringwald 
36587a766ebfSMatthias Ringwald #ifdef ENABLE_CMAC_ENGINE
36593deb3ec6SMatthias Ringwald     sm_cmac_state  = CMAC_IDLE;
36607a766ebfSMatthias Ringwald #endif
36613deb3ec6SMatthias Ringwald     dkg_state = DKG_W4_WORKING;
36623deb3ec6SMatthias Ringwald     rau_state = RAU_W4_WORKING;
36633deb3ec6SMatthias Ringwald     sm_aes128_state = SM_AES128_IDLE;
36643deb3ec6SMatthias Ringwald     sm_address_resolution_test = -1;    // no private address to resolve yet
36653deb3ec6SMatthias Ringwald     sm_address_resolution_ah_calculation_active = 0;
36663deb3ec6SMatthias Ringwald     sm_address_resolution_mode = ADDRESS_RESOLUTION_IDLE;
36673deb3ec6SMatthias Ringwald     sm_address_resolution_general_queue = NULL;
36683deb3ec6SMatthias Ringwald 
36693deb3ec6SMatthias Ringwald     gap_random_adress_update_period = 15 * 60 * 1000L;
36703deb3ec6SMatthias Ringwald     sm_active_connection = 0;
36713deb3ec6SMatthias Ringwald 
36723deb3ec6SMatthias Ringwald     test_use_fixed_local_csrk = 0;
36733deb3ec6SMatthias Ringwald 
3674e03e489aSMatthias Ringwald     // register for HCI Events from HCI
3675e03e489aSMatthias Ringwald     hci_event_callback_registration.callback = &sm_event_packet_handler;
3676e03e489aSMatthias Ringwald     hci_add_event_handler(&hci_event_callback_registration);
3677e03e489aSMatthias Ringwald 
3678b170b20fSMatthias Ringwald     // and L2CAP PDUs + L2CAP_EVENT_CAN_SEND_NOW
3679e03e489aSMatthias Ringwald     l2cap_register_fixed_channel(sm_pdu_handler, L2CAP_CID_SECURITY_MANAGER_PROTOCOL);
368027c32905SMatthias Ringwald 
368109e4d397SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
36827df18c15SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_IDLE;
368309e4d397SMatthias Ringwald #endif
368409e4d397SMatthias Ringwald 
368509e4d397SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
3686a83a0544SMatthias Ringwald 
368768437d83SMatthias Ringwald #ifndef HAVE_MALLOC
368868437d83SMatthias Ringwald     sm_mbedtls_allocator_init(mbedtls_memory_buffer, sizeof(mbedtls_memory_buffer));
3689d3bd9600SMatthias Ringwald #endif
3690a83a0544SMatthias Ringwald     mbedtls_ecp_group_init(&mbedtls_ec_group);
3691a83a0544SMatthias Ringwald     mbedtls_ecp_group_load(&mbedtls_ec_group, MBEDTLS_ECP_DP_SECP256R1);
369268437d83SMatthias Ringwald #if 0
3693e722521aSMatthias Ringwald     // test
3694a83a0544SMatthias Ringwald     sm_test_use_fixed_ec_keypair();
3695a83a0544SMatthias Ringwald     if (sm_have_ec_keypair){
3696e722521aSMatthias Ringwald         printf("test dhkey check\n");
3697e722521aSMatthias Ringwald         sm_key256_t dhkey;
3698e722521aSMatthias Ringwald         memcpy(setup->sm_peer_qx, ec_qx, 32);
3699e722521aSMatthias Ringwald         memcpy(setup->sm_peer_qy, ec_qy, 32);
3700e722521aSMatthias Ringwald         sm_sc_calculate_dhkey(dhkey);
3701a83a0544SMatthias Ringwald     }
37027df18c15SMatthias Ringwald #endif
370368437d83SMatthias Ringwald #endif
37047df18c15SMatthias Ringwald }
37057df18c15SMatthias Ringwald 
3706df86eb96SMatthias Ringwald void sm_use_fixed_ec_keypair(uint8_t * qx, uint8_t * qy, uint8_t * d){
3707a3aba2f9SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3708df86eb96SMatthias Ringwald     memcpy(ec_qx, qx, 32);
3709df86eb96SMatthias Ringwald     memcpy(ec_qy, qy, 32);
3710df86eb96SMatthias Ringwald     memcpy(ec_d, d, 32);
3711df86eb96SMatthias Ringwald     sm_have_ec_keypair = 1;
3712df86eb96SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_DONE;
3713d0662982SMatthias Ringwald #else
3714d0662982SMatthias Ringwald     UNUSED(qx);
3715d0662982SMatthias Ringwald     UNUSED(qy);
3716d0662982SMatthias Ringwald     UNUSED(d);
3717a3aba2f9SMatthias Ringwald #endif
3718df86eb96SMatthias Ringwald }
3719df86eb96SMatthias Ringwald 
37207df18c15SMatthias Ringwald void sm_test_use_fixed_ec_keypair(void){
3721a3aba2f9SMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
37227df18c15SMatthias Ringwald #ifdef USE_MBEDTLS_FOR_ECDH
37237df18c15SMatthias Ringwald     // use test keypair from spec
3724e722521aSMatthias Ringwald     mbedtls_mpi x;
3725df86eb96SMatthias Ringwald     mbedtls_mpi_init(&x);
3726e722521aSMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, "3f49f6d4a3c55f3874c9b3e3d2103f504aff607beb40b7995899b8a6cd3c1abd");
3727a83a0544SMatthias Ringwald     mbedtls_mpi_write_binary(&x, ec_d, 32);
3728e722521aSMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, "20b003d2f297be2c5e2c83a7e9f9a5b9eff49111acf4fddbcc0301480e359de6");
3729a83a0544SMatthias Ringwald     mbedtls_mpi_write_binary(&x, ec_qx, 32);
3730e722521aSMatthias Ringwald     mbedtls_mpi_read_string( &x, 16, "dc809c49652aeb6d63329abf5a52155c766345c28fed3024741c8ed01589d28b");
3731a83a0544SMatthias Ringwald     mbedtls_mpi_write_binary(&x, ec_qy, 32);
3732df86eb96SMatthias Ringwald     mbedtls_mpi_free(&x);
373327c32905SMatthias Ringwald #endif
3734df86eb96SMatthias Ringwald     sm_have_ec_keypair = 1;
3735df86eb96SMatthias Ringwald     ec_key_generation_state = EC_KEY_GENERATION_DONE;
3736a3aba2f9SMatthias Ringwald #endif
37373deb3ec6SMatthias Ringwald }
37383deb3ec6SMatthias Ringwald 
3739711e6c80SMatthias Ringwald static sm_connection_t * sm_get_connection_for_handle(hci_con_handle_t con_handle){
3740711e6c80SMatthias Ringwald     hci_connection_t * hci_con = hci_connection_for_handle(con_handle);
37413deb3ec6SMatthias Ringwald     if (!hci_con) return NULL;
37423deb3ec6SMatthias Ringwald     return &hci_con->sm_connection;
37433deb3ec6SMatthias Ringwald }
37443deb3ec6SMatthias Ringwald 
37453deb3ec6SMatthias Ringwald // @returns 0 if not encrypted, 7-16 otherwise
3746711e6c80SMatthias Ringwald int sm_encryption_key_size(hci_con_handle_t con_handle){
3747711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
37483deb3ec6SMatthias Ringwald     if (!sm_conn) return 0;     // wrong connection
37493deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted) return 0;
37503deb3ec6SMatthias Ringwald     return sm_conn->sm_actual_encryption_key_size;
37513deb3ec6SMatthias Ringwald }
37523deb3ec6SMatthias Ringwald 
3753711e6c80SMatthias Ringwald int sm_authenticated(hci_con_handle_t con_handle){
3754711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
37553deb3ec6SMatthias Ringwald     if (!sm_conn) return 0;     // wrong connection
37563deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted) return 0; // unencrypted connection cannot be authenticated
37573deb3ec6SMatthias Ringwald     return sm_conn->sm_connection_authenticated;
37583deb3ec6SMatthias Ringwald }
37593deb3ec6SMatthias Ringwald 
3760711e6c80SMatthias Ringwald authorization_state_t sm_authorization_state(hci_con_handle_t con_handle){
3761711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
37623deb3ec6SMatthias Ringwald     if (!sm_conn) return AUTHORIZATION_UNKNOWN;     // wrong connection
37633deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_encrypted)               return AUTHORIZATION_UNKNOWN; // unencrypted connection cannot be authorized
37643deb3ec6SMatthias Ringwald     if (!sm_conn->sm_connection_authenticated)           return AUTHORIZATION_UNKNOWN; // unauthenticatd connection cannot be authorized
37653deb3ec6SMatthias Ringwald     return sm_conn->sm_connection_authorization_state;
37663deb3ec6SMatthias Ringwald }
37673deb3ec6SMatthias Ringwald 
37683deb3ec6SMatthias Ringwald static void sm_send_security_request_for_connection(sm_connection_t * sm_conn){
37693deb3ec6SMatthias Ringwald     switch (sm_conn->sm_engine_state){
37703deb3ec6SMatthias Ringwald         case SM_GENERAL_IDLE:
37713deb3ec6SMatthias Ringwald         case SM_RESPONDER_IDLE:
37723deb3ec6SMatthias Ringwald             sm_conn->sm_engine_state = SM_RESPONDER_SEND_SECURITY_REQUEST;
37733deb3ec6SMatthias Ringwald             sm_run();
37743deb3ec6SMatthias Ringwald             break;
37753deb3ec6SMatthias Ringwald         default:
37763deb3ec6SMatthias Ringwald             break;
37773deb3ec6SMatthias Ringwald     }
37783deb3ec6SMatthias Ringwald }
37793deb3ec6SMatthias Ringwald 
37803deb3ec6SMatthias Ringwald /**
37813deb3ec6SMatthias Ringwald  * @brief Trigger Security Request
37823deb3ec6SMatthias Ringwald  */
3783711e6c80SMatthias Ringwald void sm_send_security_request(hci_con_handle_t con_handle){
3784711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
37853deb3ec6SMatthias Ringwald     if (!sm_conn) return;
37863deb3ec6SMatthias Ringwald     sm_send_security_request_for_connection(sm_conn);
37873deb3ec6SMatthias Ringwald }
37883deb3ec6SMatthias Ringwald 
37893deb3ec6SMatthias Ringwald // request pairing
3790711e6c80SMatthias Ringwald void sm_request_pairing(hci_con_handle_t con_handle){
3791711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
37923deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
37933deb3ec6SMatthias Ringwald 
37943deb3ec6SMatthias Ringwald     log_info("sm_request_pairing in role %u, state %u", sm_conn->sm_role, sm_conn->sm_engine_state);
37953deb3ec6SMatthias Ringwald     if (sm_conn->sm_role){
37963deb3ec6SMatthias Ringwald         sm_send_security_request_for_connection(sm_conn);
37973deb3ec6SMatthias Ringwald     } else {
37983deb3ec6SMatthias Ringwald         // used as a trigger to start central/master/initiator security procedures
37993deb3ec6SMatthias Ringwald         uint16_t ediv;
38003764b551SMatthias Ringwald         sm_key_t ltk;
38013deb3ec6SMatthias Ringwald         if (sm_conn->sm_engine_state == SM_INITIATOR_CONNECTED){
38023deb3ec6SMatthias Ringwald             switch (sm_conn->sm_irk_lookup_state){
38033deb3ec6SMatthias Ringwald                 case IRK_LOOKUP_FAILED:
38043deb3ec6SMatthias Ringwald                     sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
38053deb3ec6SMatthias Ringwald                     break;
38063deb3ec6SMatthias Ringwald                 case IRK_LOOKUP_SUCCEEDED:
38073764b551SMatthias Ringwald                         le_device_db_encryption_get(sm_conn->sm_le_db_index, &ediv, NULL, ltk, NULL, NULL, NULL);
38083764b551SMatthias Ringwald                         if (!sm_is_null_key(ltk) || ediv){
38093deb3ec6SMatthias Ringwald                             log_info("sm: Setting up previous ltk/ediv/rand for device index %u", sm_conn->sm_le_db_index);
38103deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_PH0_HAS_LTK;
38113deb3ec6SMatthias Ringwald                         } else {
38123deb3ec6SMatthias Ringwald                             sm_conn->sm_engine_state = SM_INITIATOR_PH1_W2_SEND_PAIRING_REQUEST;
38133deb3ec6SMatthias Ringwald                         }
38143deb3ec6SMatthias Ringwald                         break;
38153deb3ec6SMatthias Ringwald                 default:
38163deb3ec6SMatthias Ringwald                     sm_conn->sm_bonding_requested = 1;
38173deb3ec6SMatthias Ringwald                     break;
38183deb3ec6SMatthias Ringwald             }
3819e88b2961SMatthias Ringwald         } else if (sm_conn->sm_engine_state == SM_GENERAL_IDLE){
3820e88b2961SMatthias Ringwald             sm_conn->sm_bonding_requested = 1;
38213deb3ec6SMatthias Ringwald         }
38223deb3ec6SMatthias Ringwald     }
38233deb3ec6SMatthias Ringwald     sm_run();
38243deb3ec6SMatthias Ringwald }
38253deb3ec6SMatthias Ringwald 
38263deb3ec6SMatthias Ringwald // called by client app on authorization request
3827711e6c80SMatthias Ringwald void sm_authorization_decline(hci_con_handle_t con_handle){
3828711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38293deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38303deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authorization_state = AUTHORIZATION_DECLINED;
38315611a760SMatthias 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);
38323deb3ec6SMatthias Ringwald }
38333deb3ec6SMatthias Ringwald 
3834711e6c80SMatthias Ringwald void sm_authorization_grant(hci_con_handle_t con_handle){
3835711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38363deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38373deb3ec6SMatthias Ringwald     sm_conn->sm_connection_authorization_state = AUTHORIZATION_GRANTED;
38385611a760SMatthias 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);
38393deb3ec6SMatthias Ringwald }
38403deb3ec6SMatthias Ringwald 
38413deb3ec6SMatthias Ringwald // GAP Bonding API
38423deb3ec6SMatthias Ringwald 
3843711e6c80SMatthias Ringwald void sm_bonding_decline(hci_con_handle_t con_handle){
3844711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38453deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38463deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_DECLINE;
38473deb3ec6SMatthias Ringwald 
38483deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
3849de2fd182SMatthias Ringwald         switch (setup->sm_stk_generation_method){
3850de2fd182SMatthias Ringwald             case PK_RESP_INPUT:
3851de2fd182SMatthias Ringwald             case PK_INIT_INPUT:
3852de2fd182SMatthias Ringwald             case OK_BOTH_INPUT:
3853de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_GENERAL_SEND_PAIRING_FAILED);
3854de2fd182SMatthias Ringwald                 break;
3855de2fd182SMatthias Ringwald             case NK_BOTH_INPUT:
3856de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_NUMERIC_COMPARISON_FAILED);
3857de2fd182SMatthias Ringwald                 break;
3858de2fd182SMatthias Ringwald             case JUST_WORKS:
3859de2fd182SMatthias Ringwald             case OOB:
3860de2fd182SMatthias Ringwald                 sm_pairing_error(sm_conn, SM_REASON_UNSPECIFIED_REASON);
3861de2fd182SMatthias Ringwald                 break;
3862de2fd182SMatthias Ringwald         }
38633deb3ec6SMatthias Ringwald     }
38643deb3ec6SMatthias Ringwald     sm_run();
38653deb3ec6SMatthias Ringwald }
38663deb3ec6SMatthias Ringwald 
3867711e6c80SMatthias Ringwald void sm_just_works_confirm(hci_con_handle_t con_handle){
3868711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38693deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38703deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_CONFIRM;
38713deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
3872136d331aSMatthias Ringwald         if (setup->sm_use_secure_connections){
3873c6b7cbd9SMatthias Ringwald             sm_conn->sm_engine_state = SM_SC_SEND_PUBLIC_KEY_COMMAND;
3874bbf8db22SMatthias Ringwald         } else {
3875bbf8db22SMatthias Ringwald             sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
3876136d331aSMatthias Ringwald         }
38773deb3ec6SMatthias Ringwald     }
38780346c37cSMatthias Ringwald 
38790346c37cSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
3880c6b7cbd9SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_SC_W4_USER_RESPONSE){
3881dc300847SMatthias Ringwald         sm_sc_prepare_dhkey_check(sm_conn);
3882446a8c36SMatthias Ringwald     }
38830346c37cSMatthias Ringwald #endif
38840346c37cSMatthias Ringwald 
38853deb3ec6SMatthias Ringwald     sm_run();
38863deb3ec6SMatthias Ringwald }
38873deb3ec6SMatthias Ringwald 
3888c8c46d51SMatthias Ringwald void sm_numeric_comparison_confirm(hci_con_handle_t con_handle){
3889c8c46d51SMatthias Ringwald     // for now, it's the same
3890c8c46d51SMatthias Ringwald     sm_just_works_confirm(con_handle);
3891c8c46d51SMatthias Ringwald }
3892c8c46d51SMatthias Ringwald 
3893711e6c80SMatthias Ringwald void sm_passkey_input(hci_con_handle_t con_handle, uint32_t passkey){
3894711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
38953deb3ec6SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
38963deb3ec6SMatthias Ringwald     sm_reset_tk();
3897f8fbdce0SMatthias Ringwald     big_endian_store_32(setup->sm_tk, 12, passkey);
38983deb3ec6SMatthias Ringwald     setup->sm_user_response = SM_USER_RESPONSE_PASSKEY;
38993deb3ec6SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_PH1_W4_USER_RESPONSE){
39003deb3ec6SMatthias Ringwald         sm_conn->sm_engine_state = SM_PH2_C1_GET_RANDOM_A;
39013deb3ec6SMatthias Ringwald     }
39021c516d8fSMatthias Ringwald #ifdef ENABLE_LE_SECURE_CONNECTIONS
390307036a04SMatthias Ringwald     memcpy(setup->sm_ra, setup->sm_tk, 16);
390407036a04SMatthias Ringwald     memcpy(setup->sm_rb, setup->sm_tk, 16);
390507036a04SMatthias Ringwald     if (sm_conn->sm_engine_state == SM_SC_W4_USER_RESPONSE){
390607036a04SMatthias Ringwald         sm_sc_start_calculating_local_confirm(sm_conn);
390707036a04SMatthias Ringwald     }
39081c516d8fSMatthias Ringwald #endif
39093deb3ec6SMatthias Ringwald     sm_run();
39103deb3ec6SMatthias Ringwald }
39113deb3ec6SMatthias Ringwald 
39123d7fe1e9SMatthias Ringwald void sm_keypress_notification(hci_con_handle_t con_handle, uint8_t action){
39133d7fe1e9SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39143d7fe1e9SMatthias Ringwald     if (!sm_conn) return;     // wrong connection
39153d7fe1e9SMatthias Ringwald     if (action > SM_KEYPRESS_PASSKEY_ENTRY_COMPLETED) return;
39163d7fe1e9SMatthias Ringwald     setup->sm_keypress_notification = action;
39173d7fe1e9SMatthias Ringwald     sm_run();
39183d7fe1e9SMatthias Ringwald }
39193d7fe1e9SMatthias Ringwald 
39203deb3ec6SMatthias Ringwald /**
39213deb3ec6SMatthias Ringwald  * @brief Identify device in LE Device DB
39223deb3ec6SMatthias Ringwald  * @param handle
39233deb3ec6SMatthias Ringwald  * @returns index from le_device_db or -1 if not found/identified
39243deb3ec6SMatthias Ringwald  */
3925711e6c80SMatthias Ringwald int sm_le_device_index(hci_con_handle_t con_handle ){
3926711e6c80SMatthias Ringwald     sm_connection_t * sm_conn = sm_get_connection_for_handle(con_handle);
39273deb3ec6SMatthias Ringwald     if (!sm_conn) return -1;
39283deb3ec6SMatthias Ringwald     return sm_conn->sm_le_db_index;
39293deb3ec6SMatthias Ringwald }
39303deb3ec6SMatthias Ringwald 
39318f57b085SMatthias Ringwald static int gap_random_address_type_requires_updates(void){
39328f57b085SMatthias Ringwald     if (gap_random_adress_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return 0;
39338f57b085SMatthias Ringwald     if (gap_random_adress_type == GAP_RANDOM_ADDRESS_TYPE_OFF) return 0;
39348f57b085SMatthias Ringwald     return 1;
39358f57b085SMatthias Ringwald }
393633373e40SMatthias Ringwald static uint8_t own_address_type(void){
393733373e40SMatthias Ringwald     if (gap_random_adress_type == 0) return 0;
393833373e40SMatthias Ringwald     return 1;
393933373e40SMatthias Ringwald }
39408f57b085SMatthias Ringwald 
39413deb3ec6SMatthias Ringwald // GAP LE API
39423deb3ec6SMatthias Ringwald void gap_random_address_set_mode(gap_random_address_type_t random_address_type){
39433deb3ec6SMatthias Ringwald     gap_random_address_update_stop();
39443deb3ec6SMatthias Ringwald     gap_random_adress_type = random_address_type;
394533373e40SMatthias Ringwald     hci_le_advertisements_set_own_address_type(own_address_type());
39468f57b085SMatthias Ringwald     if (!gap_random_address_type_requires_updates()) return;
39473deb3ec6SMatthias Ringwald     gap_random_address_update_start();
39483deb3ec6SMatthias Ringwald     gap_random_address_trigger();
39493deb3ec6SMatthias Ringwald }
39503deb3ec6SMatthias Ringwald 
39513deb3ec6SMatthias Ringwald gap_random_address_type_t gap_random_address_get_mode(void){
39523deb3ec6SMatthias Ringwald     return gap_random_adress_type;
39533deb3ec6SMatthias Ringwald }
39543deb3ec6SMatthias Ringwald 
39553deb3ec6SMatthias Ringwald void gap_random_address_set_update_period(int period_ms){
39563deb3ec6SMatthias Ringwald     gap_random_adress_update_period = period_ms;
39578f57b085SMatthias Ringwald     if (!gap_random_address_type_requires_updates()) return;
39583deb3ec6SMatthias Ringwald     gap_random_address_update_stop();
39593deb3ec6SMatthias Ringwald     gap_random_address_update_start();
39603deb3ec6SMatthias Ringwald }
39613deb3ec6SMatthias Ringwald 
39627e252622SMatthias Ringwald void gap_random_address_set(bd_addr_t addr){
39638f57b085SMatthias Ringwald     gap_random_address_set_mode(GAP_RANDOM_ADDRESS_TYPE_STATIC);
39647e252622SMatthias Ringwald     memcpy(sm_random_address, addr, 6);
39655777861bSMatthias Ringwald     if (rau_state == RAU_W4_WORKING) return;
39667e252622SMatthias Ringwald     rau_state = RAU_SET_ADDRESS;
39677e252622SMatthias Ringwald     sm_run();
39687e252622SMatthias Ringwald }
39697e252622SMatthias Ringwald 
39703deb3ec6SMatthias Ringwald /*
39713deb3ec6SMatthias Ringwald  * @brief Set Advertisement Paramters
39723deb3ec6SMatthias Ringwald  * @param adv_int_min
39733deb3ec6SMatthias Ringwald  * @param adv_int_max
39743deb3ec6SMatthias Ringwald  * @param adv_type
39753deb3ec6SMatthias Ringwald  * @param direct_address_type
39763deb3ec6SMatthias Ringwald  * @param direct_address
39773deb3ec6SMatthias Ringwald  * @param channel_map
39783deb3ec6SMatthias Ringwald  * @param filter_policy
39793deb3ec6SMatthias Ringwald  *
39803deb3ec6SMatthias Ringwald  * @note own_address_type is used from gap_random_address_set_mode
39813deb3ec6SMatthias Ringwald  */
39823deb3ec6SMatthias Ringwald void gap_advertisements_set_params(uint16_t adv_int_min, uint16_t adv_int_max, uint8_t adv_type,
39833deb3ec6SMatthias Ringwald     uint8_t direct_address_typ, bd_addr_t direct_address, uint8_t channel_map, uint8_t filter_policy){
398433373e40SMatthias Ringwald     hci_le_advertisements_set_params(adv_int_min, adv_int_max, adv_type, own_address_type(),
39853deb3ec6SMatthias Ringwald         direct_address_typ, direct_address, channel_map, filter_policy);
39863deb3ec6SMatthias Ringwald }
39873deb3ec6SMatthias Ringwald 
3988