/*
* This file is part of the MicroPython project , http : //micropython.org/
*
* The MIT License ( MIT )
*
* Copyright ( c ) 2020 Damien P . George
*
* Permission is hereby granted , free of charge , to any person obtaining a copy
* of this software and associated documentation files ( the " Software " ) , to deal
* in the Software without restriction , including without limitation the rights
* to use , copy , modify , merge , publish , distribute , sublicense , and / or sell
* copies of the Software , and to permit persons to whom the Software is
* furnished to do so , subject to the following conditions :
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software .
*
* THE SOFTWARE IS PROVIDED " AS IS " , WITHOUT WARRANTY OF ANY KIND , EXPRESS OR
* IMPLIED , INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY ,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT . IN NO EVENT SHALL THE
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM , DAMAGES OR OTHER
* LIABILITY , WHETHER IN AN ACTION OF CONTRACT , TORT OR OTHERWISE , ARISING FROM ,
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE .
*/
# include "py/runtime.h"
# include "py/mperrno.h"
# include "py/mphal.h"
# if MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_BTSTACK
# include "extmod/btstack/modbluetooth_btstack.h"
# include "extmod/modbluetooth.h"
# include "lib/btstack/src/btstack.h"
# define DEBUG_printf(...) // printf("btstack: " __VA_ARGS__)
# ifndef MICROPY_PY_BLUETOOTH_DEFAULT_GAP_NAME
# define MICROPY_PY_BLUETOOTH_DEFAULT_GAP_NAME "MPY BTSTACK"
# endif
// How long to wait for a controller to init/deinit.
// Some controllers can take up to 5-6 seconds in normal operation.
static const uint32_t BTSTACK_INIT_DEINIT_TIMEOUT_MS = 15000 ;
// We need to know the attribute handle for the GAP device name (see GAP_DEVICE_NAME_UUID)
// so it can be put into the gatts_db before registering the services, and accessed
// efficiently when requesting an attribute in att_read_callback. Because this is the
// first characteristic of the first service, it always has a handle value of 3.
static const uint16_t BTSTACK_GAP_DEVICE_NAME_HANDLE = 3 ;
volatile int mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
// sm_set_authentication_requirements is set-only, so cache current value.
# if MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
static uint8_t mp_bluetooth_btstack_sm_auth_req = 0 ;
# endif
# define ERRNO_BLUETOOTH_NOT_ACTIVE MP_ENODEV
static int btstack_error_to_errno ( int err ) {
DEBUG_printf ( " --> btstack error: %d \n " , err ) ;
if ( err = = ERROR_CODE_SUCCESS ) {
return 0 ;
} else if ( err = = BTSTACK_ACL_BUFFERS_FULL | | err = = BTSTACK_MEMORY_ALLOC_FAILED ) {
return MP_ENOMEM ;
} else if ( err = = GATT_CLIENT_IN_WRONG_STATE ) {
return MP_EALREADY ;
} else if ( err = = GATT_CLIENT_BUSY ) {
return MP_EBUSY ;
} else if ( err = = GATT_CLIENT_NOT_CONNECTED ) {
return MP_ENOTCONN ;
} else {
return MP_EINVAL ;
}
}
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
static mp_obj_bluetooth_uuid_t create_mp_uuid ( uint16_t uuid16 , const uint8_t * uuid128 ) {
mp_obj_bluetooth_uuid_t result ;
result . base . type = & mp_type_bluetooth_uuid ;
if ( uuid16 ! = 0 ) {
result . data [ 0 ] = uuid16 & 0xff ;
result . data [ 1 ] = ( uuid16 > > 8 ) & 0xff ;
result . type = MP_BLUETOOTH_UUID_TYPE_16 ;
} else {
reverse_128 ( uuid128 , result . data ) ;
result . type = MP_BLUETOOTH_UUID_TYPE_128 ;
}
return result ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
typedef struct _mp_btstack_active_connection_t {
btstack_linked_item_t * next ; // Must be first field to match btstack_linked_item.
uint16_t conn_handle ;
// Read/write.
uint16_t pending_value_handle ;
// Write only. Buffer must be retained until the operation completes.
uint8_t * pending_write_value ;
size_t pending_write_value_len ;
} mp_btstack_active_connection_t ;
static mp_btstack_active_connection_t * create_active_connection ( uint16_t conn_handle ) {
DEBUG_printf ( " create_active_connection: conn_handle=%d \n " , conn_handle ) ;
mp_btstack_active_connection_t * conn = m_new ( mp_btstack_active_connection_t , 1 ) ;
conn - > conn_handle = conn_handle ;
conn - > pending_value_handle = 0xffff ;
conn - > pending_write_value = NULL ;
conn - > pending_write_value_len = 0 ;
bool added = btstack_linked_list_add ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > active_connections , ( btstack_linked_item_t * ) conn ) ;
( void ) added ;
assert ( added ) ;
return conn ;
}
static mp_btstack_active_connection_t * find_active_connection ( uint16_t conn_handle ) {
DEBUG_printf ( " find_active_connection: conn_handle=%d \n " , conn_handle ) ;
btstack_linked_list_iterator_t it ;
btstack_linked_list_iterator_init ( & it , & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > active_connections ) ;
mp_btstack_active_connection_t * conn = NULL ;
while ( btstack_linked_list_iterator_has_next ( & it ) ) {
conn = ( mp_btstack_active_connection_t * ) btstack_linked_list_iterator_next ( & it ) ;
DEBUG_printf ( " --> iter conn %d \n " , conn - > conn_handle ) ;
if ( conn - > conn_handle = = conn_handle ) {
break ;
}
}
return conn ;
}
static void remove_active_connection ( uint16_t conn_handle ) {
DEBUG_printf ( " remove_active_connection: conn_handle=%d \n " , conn_handle ) ;
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( conn ) {
bool removed = btstack_linked_list_remove ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > active_connections , ( btstack_linked_item_t * ) conn ) ;
( void ) removed ;
assert ( removed ) ;
m_del ( mp_btstack_active_connection_t , conn , 1 ) ;
}
}
# endif
// This needs to be separate to btstack_packet_handler otherwise we get
// dual-delivery of the HCI_EVENT_LE_META event.
static void btstack_packet_handler_att_server ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
DEBUG_printf ( " btstack_packet_handler_att_server(packet_type=%u, packet=%p) \n " , packet_type , packet ) ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = ATT_EVENT_CONNECTED ) {
DEBUG_printf ( " --> att connected \n " ) ;
// The ATT_EVENT_*CONNECTED events are fired for both peripheral and central role, with no way to tell which.
// So we use the HCI_EVENT_LE_META event directly in the main packet handler.
} else if ( event_type = = ATT_EVENT_DISCONNECTED ) {
DEBUG_printf ( " --> att disconnected \n " ) ;
} else if ( event_type = = ATT_EVENT_HANDLE_VALUE_INDICATION_COMPLETE ) {
DEBUG_printf ( " --> att indication complete \n " ) ;
uint16_t conn_handle = att_event_handle_value_indication_complete_get_conn_handle ( packet ) ;
uint16_t value_handle = att_event_handle_value_indication_complete_get_attribute_handle ( packet ) ;
uint8_t status = att_event_handle_value_indication_complete_get_status ( packet ) ;
mp_bluetooth_gatts_on_indicate_complete ( conn_handle , value_handle , status ) ;
} else if ( event_type = = ATT_EVENT_MTU_EXCHANGE_COMPLETE ) {
DEBUG_printf ( " --> att mtu exchange complete \n " ) ;
// This is triggered in peripheral mode, when exchange initiated by us or remote.
uint16_t conn_handle = att_event_mtu_exchange_complete_get_handle ( packet ) ;
uint16_t mtu = att_event_mtu_exchange_complete_get_MTU ( packet ) ;
mp_bluetooth_gatts_on_mtu_exchanged ( conn_handle , mtu ) ;
} else if ( event_type = = HCI_EVENT_LE_META | | event_type = = HCI_EVENT_DISCONNECTION_COMPLETE ) {
// Ignore, duplicated by att_server.c.
DEBUG_printf ( " --> hci att server event type: le_meta/disconnection (0x%02x) \n " , event_type ) ;
} else {
DEBUG_printf ( " --> hci att server event type: unknown (0x%02x) \n " , event_type ) ;
}
}
# if MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
// During startup, the controller (e.g. Zephyr) might give us a static address that we can use.
static uint8_t controller_static_addr [ 6 ] = { 0 } ;
static bool controller_static_addr_available = false ;
static const uint8_t read_static_address_command_complete_prefix [ ] = { 0x0e , 0x1b , 0x01 , 0x09 , 0xfc } ;
# endif
static void btstack_packet_handler_generic ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
DEBUG_printf ( " btstack_packet_handler_generic(packet_type=%u, packet=%p) \n " , packet_type , packet ) ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = HCI_EVENT_LE_META ) {
DEBUG_printf ( " --> hci le meta \n " ) ;
switch ( hci_event_le_meta_get_subevent_code ( packet ) ) {
case HCI_SUBEVENT_LE_CONNECTION_COMPLETE : {
uint16_t conn_handle = hci_subevent_le_connection_complete_get_connection_handle ( packet ) ;
uint8_t addr_type = hci_subevent_le_connection_complete_get_peer_address_type ( packet ) ;
bd_addr_t addr ;
hci_subevent_le_connection_complete_get_peer_address ( packet , addr ) ;
uint16_t irq_event ;
if ( hci_subevent_le_connection_complete_get_role ( packet ) = = 0 ) {
// Master role.
irq_event = MP_BLUETOOTH_IRQ_PERIPHERAL_CONNECT ;
} else {
// Slave role.
irq_event = MP_BLUETOOTH_IRQ_CENTRAL_CONNECT ;
}
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
create_active_connection ( conn_handle ) ;
# endif
mp_bluetooth_gap_on_connected_disconnected ( irq_event , conn_handle , addr_type , addr ) ;
break ;
}
case HCI_SUBEVENT_LE_CONNECTION_UPDATE_COMPLETE : {
uint8_t status = hci_subevent_le_connection_update_complete_get_status ( packet ) ;
uint16_t conn_handle = hci_subevent_le_connection_update_complete_get_connection_handle ( packet ) ;
uint16_t conn_interval = hci_subevent_le_connection_update_complete_get_conn_interval ( packet ) ;
uint16_t conn_latency = hci_subevent_le_connection_update_complete_get_conn_latency ( packet ) ;
uint16_t supervision_timeout = hci_subevent_le_connection_update_complete_get_supervision_timeout ( packet ) ;
DEBUG_printf ( " - LE Connection %04x: connection update - connection interval %u.%02u ms, latency %u, timeout %u \n " ,
conn_handle , conn_interval * 125 / 100 , 25 * ( conn_interval & 3 ) , conn_latency , supervision_timeout ) ;
mp_bluetooth_gap_on_connection_update ( conn_handle , conn_interval , conn_latency , supervision_timeout , status ) ;
break ;
}
}
} else if ( event_type = = BTSTACK_EVENT_STATE ) {
uint8_t state = btstack_event_state_get_state ( packet ) ;
DEBUG_printf ( " --> btstack event state 0x%02x \n " , state ) ;
if ( state = = HCI_STATE_WORKING ) {
// Signal that initialisation has completed.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ;
} else if ( state = = HCI_STATE_HALTING ) {
// Signal that de-initialisation has begun.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_HALTING ;
} else if ( state = = HCI_STATE_OFF ) {
// Signal that de-initialisation has completed.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
}
} else if ( event_type = = BTSTACK_EVENT_POWERON_FAILED ) {
// Signal that initialisation has failed.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
} else if ( event_type = = HCI_EVENT_TRANSPORT_PACKET_SENT ) {
DEBUG_printf ( " --> hci transport packet sent \n " ) ;
} else if ( event_type = = HCI_EVENT_COMMAND_COMPLETE ) {
DEBUG_printf ( " --> hci command complete \n " ) ;
# if MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
if ( memcmp ( packet , read_static_address_command_complete_prefix , sizeof ( read_static_address_command_complete_prefix ) ) = = 0 ) {
DEBUG_printf ( " --> static address available \n " ) ;
reverse_48 ( & packet [ 7 ] , controller_static_addr ) ;
controller_static_addr_available = true ;
}
# endif // MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
} else if ( event_type = = HCI_EVENT_COMMAND_STATUS ) {
DEBUG_printf ( " --> hci command status \n " ) ;
} else if ( event_type = = HCI_EVENT_NUMBER_OF_COMPLETED_PACKETS ) {
DEBUG_printf ( " --> hci number of completed packets \n " ) ;
} else if ( event_type = = BTSTACK_EVENT_NR_CONNECTIONS_CHANGED ) {
DEBUG_printf ( " --> btstack # conns changed \n " ) ;
} else if ( event_type = = HCI_EVENT_VENDOR_SPECIFIC ) {
DEBUG_printf ( " --> hci vendor specific \n " ) ;
} else if ( event_type = = SM_EVENT_AUTHORIZATION_RESULT | |
event_type = = SM_EVENT_PAIRING_COMPLETE | |
// event_type == GAP_EVENT_DEDICATED_BONDING_COMPLETED || // No conn_handle
event_type = = HCI_EVENT_ENCRYPTION_CHANGE ) {
DEBUG_printf ( " --> enc/auth/pair/bond change \n " ) ;
# if MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
uint16_t conn_handle ;
switch ( event_type ) {
case SM_EVENT_AUTHORIZATION_RESULT :
conn_handle = sm_event_authorization_result_get_handle ( packet ) ;
break ;
case SM_EVENT_PAIRING_COMPLETE :
conn_handle = sm_event_pairing_complete_get_handle ( packet ) ;
break ;
case HCI_EVENT_ENCRYPTION_CHANGE :
conn_handle = hci_event_encryption_change_get_connection_handle ( packet ) ;
break ;
default :
return ;
}
hci_connection_t * hci_con = hci_connection_for_handle ( conn_handle ) ;
sm_connection_t * desc = & hci_con - > sm_connection ;
mp_bluetooth_gatts_on_encryption_update ( conn_handle ,
desc - > sm_connection_encrypted ,
desc - > sm_connection_authenticated ,
desc - > sm_le_db_index ! = - 1 ,
desc - > sm_actual_encryption_key_size ) ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
} else if ( event_type = = HCI_EVENT_DISCONNECTION_COMPLETE ) {
DEBUG_printf ( " --> hci disconnect complete \n " ) ;
uint16_t conn_handle = hci_event_disconnection_complete_get_connection_handle ( packet ) ;
const hci_connection_t * conn = hci_connection_for_handle ( conn_handle ) ;
uint16_t irq_event ;
if ( conn = = NULL | | conn - > role = = 0 ) {
// Master role.
irq_event = MP_BLUETOOTH_IRQ_PERIPHERAL_DISCONNECT ;
} else {
// Slave role.
irq_event = MP_BLUETOOTH_IRQ_CENTRAL_DISCONNECT ;
}
uint8_t addr [ 6 ] = { 0 } ;
mp_bluetooth_gap_on_connected_disconnected ( irq_event , conn_handle , 0xff , addr ) ;
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
remove_active_connection ( conn_handle ) ;
# endif
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
} else if ( event_type = = GAP_EVENT_ADVERTISING_REPORT ) {
DEBUG_printf ( " --> gap advertising report \n " ) ;
bd_addr_t address ;
gap_event_advertising_report_get_address ( packet , address ) ;
uint8_t adv_event_type = gap_event_advertising_report_get_advertising_event_type ( packet ) ;
uint8_t address_type = gap_event_advertising_report_get_address_type ( packet ) ;
int8_t rssi = gap_event_advertising_report_get_rssi ( packet ) ;
uint8_t length = gap_event_advertising_report_get_data_length ( packet ) ;
const uint8_t * data = gap_event_advertising_report_get_data ( packet ) ;
mp_bluetooth_gap_on_scan_result ( address_type , address , adv_event_type , rssi , data , length ) ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
} else if ( event_type = = GATT_EVENT_MTU ) {
// This is triggered in central mode.
DEBUG_printf ( " --> gatt event mtu \n " ) ;
uint16_t conn_handle = gatt_event_mtu_get_handle ( packet ) ;
uint16_t mtu = gatt_event_mtu_get_MTU ( packet ) ;
mp_bluetooth_gatts_on_mtu_exchanged ( conn_handle , mtu ) ;
} else if ( event_type = = GATT_EVENT_NOTIFICATION ) {
DEBUG_printf ( " --> gatt notification \n " ) ;
uint16_t conn_handle = gatt_event_notification_get_handle ( packet ) ;
uint16_t value_handle = gatt_event_notification_get_value_handle ( packet ) ;
uint16_t len = gatt_event_notification_get_value_length ( packet ) ;
const uint8_t * data = gatt_event_notification_get_value ( packet ) ;
mp_bluetooth_gattc_on_data_available ( MP_BLUETOOTH_IRQ_GATTC_NOTIFY , conn_handle , value_handle , & data , & len , 1 ) ;
} else if ( event_type = = GATT_EVENT_INDICATION ) {
DEBUG_printf ( " --> gatt indication \n " ) ;
uint16_t conn_handle = gatt_event_indication_get_handle ( packet ) ;
uint16_t value_handle = gatt_event_indication_get_value_handle ( packet ) ;
uint16_t len = gatt_event_indication_get_value_length ( packet ) ;
const uint8_t * data = gatt_event_indication_get_value ( packet ) ;
mp_bluetooth_gattc_on_data_available ( MP_BLUETOOTH_IRQ_GATTC_INDICATE , conn_handle , value_handle , & data , & len , 1 ) ;
} else if ( event_type = = GATT_EVENT_CAN_WRITE_WITHOUT_RESPONSE ) {
uint16_t conn_handle = gatt_event_can_write_without_response_get_handle ( packet ) ;
DEBUG_printf ( " --> gatt can write without response %d \n " , conn_handle ) ;
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( ! conn | | conn - > pending_value_handle = = 0xffff | | ! conn - > pending_write_value ) {
return ;
}
DEBUG_printf ( " --> ready for value_handle=%d len=%lu \n " , conn - > pending_value_handle , conn - > pending_write_value_len ) ;
int err = gatt_client_write_value_of_characteristic_without_response ( conn_handle , conn - > pending_value_handle , conn - > pending_write_value_len , conn - > pending_write_value ) ;
( void ) err ;
assert ( err = = ERROR_CODE_SUCCESS ) ;
conn - > pending_value_handle = 0xffff ;
m_del ( uint8_t , conn - > pending_write_value , conn - > pending_write_value_len ) ;
conn - > pending_write_value = NULL ;
conn - > pending_write_value_len = 0 ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
} else {
DEBUG_printf ( " --> hci event type: unknown (0x%02x) \n " , event_type ) ;
}
}
static btstack_packet_callback_registration_t hci_event_callback_registration = {
. callback = & btstack_packet_handler_generic
} ;
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// For when the handler is being used for service discovery.
static void btstack_packet_handler_discover_services ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = GATT_EVENT_SERVICE_QUERY_RESULT ) {
DEBUG_printf ( " --> gatt service query result \n " ) ;
uint16_t conn_handle = gatt_event_service_query_result_get_handle ( packet ) ;
gatt_client_service_t service ;
gatt_event_service_query_result_get_service ( packet , & service ) ;
mp_obj_bluetooth_uuid_t service_uuid = create_mp_uuid ( service . uuid16 , service . uuid128 ) ;
mp_bluetooth_gattc_on_primary_service_result ( conn_handle , service . start_group_handle , service . end_group_handle , & service_uuid ) ;
} else if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint16_t status = gatt_event_query_complete_get_att_status ( packet ) ;
DEBUG_printf ( " --> gatt query services complete conn_handle=%d status=%d \n " , conn_handle , status ) ;
mp_bluetooth_gattc_on_discover_complete ( MP_BLUETOOTH_IRQ_GATTC_SERVICE_DONE , conn_handle , status ) ;
}
}
// For when the handler is being used for characteristic discovery.
static void btstack_packet_handler_discover_characteristics ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = GATT_EVENT_CHARACTERISTIC_QUERY_RESULT ) {
DEBUG_printf ( " --> gatt characteristic query result \n " ) ;
uint16_t conn_handle = gatt_event_characteristic_query_result_get_handle ( packet ) ;
gatt_client_characteristic_t characteristic ;
gatt_event_characteristic_query_result_get_characteristic ( packet , & characteristic ) ;
mp_obj_bluetooth_uuid_t characteristic_uuid = create_mp_uuid ( characteristic . uuid16 , characteristic . uuid128 ) ;
mp_bluetooth_gattc_on_characteristic_result ( conn_handle , characteristic . value_handle , characteristic . end_handle , characteristic . properties , & characteristic_uuid ) ;
} else if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint16_t status = gatt_event_query_complete_get_att_status ( packet ) ;
DEBUG_printf ( " --> gatt query characteristics complete conn_handle=%d status=%d \n " , conn_handle , status ) ;
mp_bluetooth_gattc_on_discover_complete ( MP_BLUETOOTH_IRQ_GATTC_CHARACTERISTIC_DONE , conn_handle , status ) ;
}
}
// For when the handler is being used for descriptor discovery.
static void btstack_packet_handler_discover_descriptors ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = GATT_EVENT_ALL_CHARACTERISTIC_DESCRIPTORS_QUERY_RESULT ) {
DEBUG_printf ( " --> gatt descriptor query result \n " ) ;
uint16_t conn_handle = gatt_event_all_characteristic_descriptors_query_result_get_handle ( packet ) ;
gatt_client_characteristic_descriptor_t descriptor ;
gatt_event_all_characteristic_descriptors_query_result_get_characteristic_descriptor ( packet , & descriptor ) ;
mp_obj_bluetooth_uuid_t descriptor_uuid = create_mp_uuid ( descriptor . uuid16 , descriptor . uuid128 ) ;
mp_bluetooth_gattc_on_descriptor_result ( conn_handle , descriptor . handle , & descriptor_uuid ) ;
} else if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint16_t status = gatt_event_query_complete_get_att_status ( packet ) ;
DEBUG_printf ( " --> gatt query descriptors complete conn_handle=%d status=%d \n " , conn_handle , status ) ;
mp_bluetooth_gattc_on_discover_complete ( MP_BLUETOOTH_IRQ_GATTC_DESCRIPTOR_DONE , conn_handle , status ) ;
}
}
// For when the handler is being used for a read query.
static void btstack_packet_handler_read ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint16_t status = gatt_event_query_complete_get_att_status ( packet ) ;
DEBUG_printf ( " --> gatt query read complete conn_handle=%d status=%d \n " , conn_handle , status ) ;
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( ! conn ) {
return ;
}
uint16_t value_handle = conn - > pending_value_handle ;
conn - > pending_value_handle = 0xffff ;
mp_bluetooth_gattc_on_read_write_status ( MP_BLUETOOTH_IRQ_GATTC_READ_DONE , conn_handle , value_handle , status ) ;
} else if ( event_type = = GATT_EVENT_CHARACTERISTIC_VALUE_QUERY_RESULT ) {
DEBUG_printf ( " --> gatt characteristic value query result \n " ) ;
uint16_t conn_handle = gatt_event_characteristic_value_query_result_get_handle ( packet ) ;
uint16_t value_handle = gatt_event_characteristic_value_query_result_get_value_handle ( packet ) ;
uint16_t len = gatt_event_characteristic_value_query_result_get_value_length ( packet ) ;
const uint8_t * data = gatt_event_characteristic_value_query_result_get_value ( packet ) ;
mp_bluetooth_gattc_on_data_available ( MP_BLUETOOTH_IRQ_GATTC_READ_RESULT , conn_handle , value_handle , & data , & len , 1 ) ;
}
}
// For when the handler is being used for write-with-response.
static void btstack_packet_handler_write_with_response ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
( void ) channel ;
( void ) size ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint16_t status = gatt_event_query_complete_get_att_status ( packet ) ;
DEBUG_printf ( " --> gatt query write complete conn_handle=%d status=%d \n " , conn_handle , status ) ;
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( ! conn ) {
return ;
}
uint16_t value_handle = conn - > pending_value_handle ;
conn - > pending_value_handle = 0xffff ;
m_del ( uint8_t , conn - > pending_write_value , conn - > pending_write_value_len ) ;
conn - > pending_write_value = NULL ;
conn - > pending_write_value_len = 0 ;
mp_bluetooth_gattc_on_read_write_status ( MP_BLUETOOTH_IRQ_GATTC_WRITE_DONE , conn_handle , value_handle , status ) ;
}
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
static btstack_timer_source_t btstack_init_deinit_timeout ;
static void btstack_init_deinit_timeout_handler ( btstack_timer_source_t * ds ) {
( void ) ds ;
// Stop waiting for initialisation.
// This signals both the loops in mp_bluetooth_init and mp_bluetooth_deinit,
// as well as ports that run a polling loop.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_TIMEOUT ;
}
# if !MICROPY_BLUETOOTH_USE_MP_HAL_GET_MAC_STATIC_ADDRESS
static void btstack_static_address_ready ( void * arg ) {
DEBUG_printf ( " btstack_static_address_ready. \n " ) ;
* ( volatile bool * ) arg = true ;
}
# endif
static bool set_public_address ( void ) {
bd_addr_t local_addr ;
gap_local_bd_addr ( local_addr ) ;
bd_addr_t null_addr = { 0 } ;
if ( memcmp ( local_addr , null_addr , 6 ) = = 0 ) {
DEBUG_printf ( " set_public_address: No public address available. \n " ) ;
return false ;
}
DEBUG_printf ( " set_public_address: Using controller's public address. \n " ) ;
gap_random_address_set_mode ( GAP_RANDOM_ADDRESS_TYPE_OFF ) ;
return true ;
}
static void set_random_address ( void ) {
# if MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
if ( controller_static_addr_available ) {
DEBUG_printf ( " set_random_address: Using static address supplied by controller. \n " ) ;
gap_random_address_set ( controller_static_addr ) ;
} else
# endif // MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
{
bd_addr_t static_addr ;
# if MICROPY_BLUETOOTH_USE_MP_HAL_GET_MAC_STATIC_ADDRESS
DEBUG_printf ( " set_random_address: Generating static address using mp_hal_get_mac \n " ) ;
mp_hal_get_mac ( MP_HAL_MAC_BDADDR , static_addr ) ;
# else
DEBUG_printf ( " set_random_address: Generating random static address. \n " ) ;
btstack_crypto_random_t sm_crypto_random_request ;
volatile bool ready = false ;
btstack_crypto_random_generate ( & sm_crypto_random_request , static_addr , 6 , & btstack_static_address_ready , ( void * ) & ready ) ;
while ( ! ready ) {
mp_event_wait_indefinite ( ) ;
}
# endif // MICROPY_BLUETOOTH_USE_MP_HAL_GET_MAC_STATIC_ADDRESS
// Mark it as STATIC (not RPA or NRPA).
static_addr [ 0 ] | = 0xc0 ;
DEBUG_printf ( " set_random_address: Address generated. \n " ) ;
gap_random_address_set ( static_addr ) ;
}
// Wait for the controller to accept this address.
while ( true ) {
uint8_t addr_type ;
bd_addr_t addr ;
gap_le_get_own_address ( & addr_type , addr ) ;
bd_addr_t null_addr = { 0 } ;
if ( memcmp ( addr , null_addr , 6 ) ! = 0 ) {
break ;
}
mp_event_wait_indefinite ( ) ;
}
DEBUG_printf ( " set_random_address: Address loaded by controller \n " ) ;
}
static void deinit_stack ( void ) {
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
// Deinitialise BTstack components.
sm_deinit ( ) ;
l2cap_deinit ( ) ;
hci_deinit ( ) ;
btstack_memory_deinit ( ) ;
btstack_run_loop_deinit ( ) ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) = NULL ;
}
int mp_bluetooth_init ( void ) {
DEBUG_printf ( " mp_bluetooth_init \n " ) ;
if ( mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ) {
return 0 ;
}
// Clean up if necessary.
mp_bluetooth_deinit ( ) ;
btstack_memory_init ( ) ;
# if MICROPY_BLUETOOTH_USE_ZEPHYR_STATIC_ADDRESS
controller_static_addr_available = false ;
# endif
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) = m_new0 ( mp_bluetooth_btstack_root_pointers_t , 1 ) ;
mp_bluetooth_gatts_db_create ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db ) ;
// Set the default GAP device name.
const char * gap_name = MICROPY_PY_BLUETOOTH_DEFAULT_GAP_NAME ;
size_t gap_len = strlen ( gap_name ) ;
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , BTSTACK_GAP_DEVICE_NAME_HANDLE , gap_len ) ;
mp_bluetooth_gap_set_device_name ( ( const uint8_t * ) gap_name , gap_len ) ;
mp_bluetooth_btstack_port_init ( ) ;
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_STARTING ;
l2cap_init ( ) ;
le_device_db_init ( ) ;
sm_init ( ) ;
// Set blank ER/IR keys to suppress BTstack warning.
// TODO handle this correctly.
sm_key_t dummy_key ;
memset ( dummy_key , 0 , sizeof ( dummy_key ) ) ;
sm_set_er ( dummy_key ) ;
sm_set_ir ( dummy_key ) ;
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
gatt_client_init ( ) ;
// We always require explicitly exchanging MTU with ble.gattc_exchange_mtu().
gatt_client_mtu_enable_auto_negotiation ( false ) ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// Register for HCI events.
hci_add_event_handler ( & hci_event_callback_registration ) ;
// Register for ATT server events.
att_server_register_packet_handler ( & btstack_packet_handler_att_server ) ;
// Set a timeout for HCI initialisation.
btstack_run_loop_set_timer ( & btstack_init_deinit_timeout , BTSTACK_INIT_DEINIT_TIMEOUT_MS ) ;
btstack_run_loop_set_timer_handler ( & btstack_init_deinit_timeout , btstack_init_deinit_timeout_handler ) ;
btstack_run_loop_add_timer ( & btstack_init_deinit_timeout ) ;
DEBUG_printf ( " mp_bluetooth_init: waiting for stack startup \n " ) ;
// Either the HCI event will set state to ACTIVE, or the timeout will set it to TIMEOUT.
mp_bluetooth_btstack_port_start ( ) ;
while ( mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_STARTING ) {
mp_event_wait_indefinite ( ) ;
}
btstack_run_loop_remove_timer ( & btstack_init_deinit_timeout ) ;
// Check for timeout.
if ( mp_bluetooth_btstack_state ! = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ) {
DEBUG_printf ( " mp_bluetooth_init: stack startup timed out \n " ) ;
bool timeout = mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_TIMEOUT ;
// Required to stop the polling loop.
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
// Attempt a shutdown (may not do anything).
mp_bluetooth_btstack_port_deinit ( ) ;
// Clean up BTstack.
deinit_stack ( ) ;
return timeout ? MP_ETIMEDOUT : MP_EINVAL ;
}
DEBUG_printf ( " mp_bluetooth_init: stack startup complete \n " ) ;
// At this point if the controller has its own public address, btstack will know this.
// However, if this is not available, then attempt to get a static address:
// - For a Zephyr controller on nRF, a static address will be available during startup.
// - Otherwise we ask the controller to generate a static address for us.
// In either case, calling gap_random_address_set will set the mode to STATIC, and then
// immediately set the address on the controller. We then wait until this address becomes available.
if ( ! set_public_address ( ) ) {
set_random_address ( ) ;
}
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// Enable GATT_EVENT_NOTIFICATION/GATT_EVENT_INDICATION for all connections and handles.
gatt_client_listen_for_characteristic_value_updates ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > notification , & btstack_packet_handler_generic , GATT_CLIENT_ANY_CONNECTION , NULL ) ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// Always include at least the standard GAP and GATT default services. A
// peripheral (likely a server) will almost always override this with its
// own services, but a central should get the default services, e.g. so
// the remote end can find out its GAP name.
mp_bluetooth_gatts_register_service_begin ( false ) ;
mp_bluetooth_gatts_register_service_end ( ) ;
return 0 ;
}
void mp_bluetooth_deinit ( void ) {
DEBUG_printf ( " mp_bluetooth_deinit \n " ) ;
// Nothing to do if not initialised.
if ( ! MP_STATE_PORT ( bluetooth_btstack_root_pointers ) ) {
return ;
}
mp_bluetooth_gap_advertise_stop ( ) ;
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// Remove our registration for notify/indicate.
gatt_client_stop_listening_for_characteristic_value_updates ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > notification ) ;
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
// Set a timer that will forcibly set the state to TIMEOUT, which will stop the loop below.
btstack_run_loop_set_timer ( & btstack_init_deinit_timeout , BTSTACK_INIT_DEINIT_TIMEOUT_MS ) ;
btstack_run_loop_add_timer ( & btstack_init_deinit_timeout ) ;
// This should result in a clean shutdown, which will set the state to OFF.
// On Unix this is blocking (it joins on the poll thread), on other ports the loop below will wait unil
// either timeout or clean shutdown.
mp_bluetooth_btstack_port_deinit ( ) ;
while ( mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ) {
mp_event_wait_indefinite ( ) ;
}
btstack_run_loop_remove_timer ( & btstack_init_deinit_timeout ) ;
// Clean up BTstack.
deinit_stack ( ) ;
DEBUG_printf ( " mp_bluetooth_deinit: complete \n " ) ;
}
bool mp_bluetooth_is_active ( void ) {
return mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ;
}
void mp_bluetooth_get_current_address ( uint8_t * addr_type , uint8_t * addr ) {
if ( ! mp_bluetooth_is_active ( ) ) {
mp_raise_OSError ( ERRNO_BLUETOOTH_NOT_ACTIVE ) ;
}
DEBUG_printf ( " mp_bluetooth_get_current_address \n " ) ;
gap_le_get_own_address ( addr_type , addr ) ;
}
void mp_bluetooth_set_address_mode ( uint8_t addr_mode ) {
if ( ! mp_bluetooth_is_active ( ) ) {
mp_raise_OSError ( ERRNO_BLUETOOTH_NOT_ACTIVE ) ;
}
switch ( addr_mode ) {
case MP_BLUETOOTH_ADDRESS_MODE_PUBLIC : {
DEBUG_printf ( " mp_bluetooth_set_address_mode: public \n " ) ;
if ( ! set_public_address ( ) ) {
// No public address available.
mp_raise_OSError ( MP_EINVAL ) ;
}
break ;
}
case MP_BLUETOOTH_ADDRESS_MODE_RANDOM : {
DEBUG_printf ( " mp_bluetooth_set_address_mode: random \n " ) ;
set_random_address ( ) ;
break ;
}
case MP_BLUETOOTH_ADDRESS_MODE_RPA :
case MP_BLUETOOTH_ADDRESS_MODE_NRPA :
// Not yet supported.
mp_raise_OSError ( MP_EINVAL ) ;
}
}
# if MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
void mp_bluetooth_set_bonding ( bool enabled ) {
if ( enabled ) {
mp_bluetooth_btstack_sm_auth_req | = SM_AUTHREQ_BONDING ;
} else {
mp_bluetooth_btstack_sm_auth_req & = ~ SM_AUTHREQ_BONDING ;
}
sm_set_authentication_requirements ( mp_bluetooth_btstack_sm_auth_req ) ;
}
void mp_bluetooth_set_mitm_protection ( bool enabled ) {
if ( enabled ) {
mp_bluetooth_btstack_sm_auth_req | = SM_AUTHREQ_MITM_PROTECTION ;
} else {
mp_bluetooth_btstack_sm_auth_req & = ~ SM_AUTHREQ_MITM_PROTECTION ;
}
sm_set_authentication_requirements ( mp_bluetooth_btstack_sm_auth_req ) ;
}
void mp_bluetooth_set_le_secure ( bool enabled ) {
if ( enabled ) {
mp_bluetooth_btstack_sm_auth_req | = SM_AUTHREQ_SECURE_CONNECTION ;
} else {
mp_bluetooth_btstack_sm_auth_req & = ~ SM_AUTHREQ_SECURE_CONNECTION ;
}
sm_set_authentication_requirements ( mp_bluetooth_btstack_sm_auth_req ) ;
}
void mp_bluetooth_set_io_capability ( uint8_t capability ) {
sm_set_io_capabilities ( capability ) ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
size_t mp_bluetooth_gap_get_device_name ( const uint8_t * * buf ) {
const uint8_t * value = NULL ;
size_t value_len = 0 ;
mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , BTSTACK_GAP_DEVICE_NAME_HANDLE , & value , & value_len ) ;
* buf = value ;
return value_len ;
}
int mp_bluetooth_gap_set_device_name ( const uint8_t * buf , size_t len ) {
return mp_bluetooth_gatts_db_write ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , BTSTACK_GAP_DEVICE_NAME_HANDLE , buf , len ) ;
}
int mp_bluetooth_gap_advertise_start ( bool connectable , int32_t interval_us , const uint8_t * adv_data , size_t adv_data_len , const uint8_t * sr_data , size_t sr_data_len ) {
DEBUG_printf ( " mp_bluetooth_gap_advertise_start \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
uint16_t adv_int_min = interval_us / 625 ;
uint16_t adv_int_max = interval_us / 625 ;
uint8_t adv_type = connectable ? 0 : 2 ;
bd_addr_t null_addr = { 0 } ;
uint8_t direct_address_type = 0 ;
uint8_t channel_map = 0x07 ; // Use all three broadcast channels.
uint8_t filter_policy = 0x00 ; // None.
gap_advertisements_set_params ( adv_int_min , adv_int_max , adv_type , direct_address_type , null_addr , channel_map , filter_policy ) ;
// Copy the adv_data and sr_data into a persistent buffer (which is findable via the btstack root pointers).
size_t total_bytes = adv_data_len + sr_data_len ;
if ( total_bytes > MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data_alloc ) {
// Resize if necessary.
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data = m_new ( uint8_t , total_bytes ) ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data_alloc = total_bytes ;
}
uint8_t * data = MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data ;
if ( adv_data ) {
memcpy ( data , ( uint8_t * ) adv_data , adv_data_len ) ;
gap_advertisements_set_data ( adv_data_len , data ) ;
data + = adv_data_len ;
}
if ( sr_data ) {
memcpy ( data , ( uint8_t * ) sr_data , sr_data_len ) ;
gap_scan_response_set_data ( sr_data_len , data ) ;
}
gap_advertisements_enable ( true ) ;
return 0 ;
}
void mp_bluetooth_gap_advertise_stop ( void ) {
DEBUG_printf ( " mp_bluetooth_gap_advertise_stop \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ;
}
gap_advertisements_enable ( false ) ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data_alloc = 0 ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > adv_data = NULL ;
}
int mp_bluetooth_gatts_register_service_begin ( bool append ) {
DEBUG_printf ( " mp_bluetooth_gatts_register_service_begin \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
if ( ! append ) {
// This will reset the DB.
// Because the DB is statically allocated, there's no problem with just re-initing it.
// Note this would be a memory leak if we enabled HAVE_MALLOC (there's no API to free the existing db).
att_db_util_init ( ) ;
att_db_util_add_service_uuid16 ( GAP_SERVICE_UUID ) ;
uint16_t handle = att_db_util_add_characteristic_uuid16 ( GAP_DEVICE_NAME_UUID , ATT_PROPERTY_READ | ATT_PROPERTY_DYNAMIC , ATT_SECURITY_NONE , ATT_SECURITY_NONE , NULL , 0 ) ;
( void ) handle ;
assert ( handle = = BTSTACK_GAP_DEVICE_NAME_HANDLE ) ;
att_db_util_add_service_uuid16 ( 0x1801 ) ;
att_db_util_add_characteristic_uuid16 ( 0x2a05 , ATT_PROPERTY_READ , ATT_SECURITY_NONE , ATT_SECURITY_NONE , NULL , 0 ) ;
}
return 0 ;
}
static uint16_t att_read_callback ( hci_con_handle_t connection_handle , uint16_t att_handle , uint16_t offset , uint8_t * buffer , uint16_t buffer_size ) {
// Should return data length, 0 for error, or -1 for delayed response.
// For more details search "*att_read_callback*" in micropython/lib/btstack/doc/manual/docs/profiles.md
( void ) connection_handle ;
DEBUG_printf ( " att_read_callback (handle: %u, offset: %u, buffer: %p, size: %u) \n " , att_handle , offset , buffer , buffer_size ) ;
mp_bluetooth_gatts_db_entry_t * entry = mp_bluetooth_gatts_db_lookup ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , att_handle ) ;
if ( ! entry ) {
DEBUG_printf ( " att_read_callback handle not found \n " ) ;
return 0 ;
}
// Allow Python code to override value (by using gatts_write), or deny (by returning false) the read.
// Note this will be a no-op if the ringbuffer implementation is being used, as the Python callback cannot
// be executed synchronously. This is currently always the case for btstack.
if ( ( buffer = = NULL ) & & ( buffer_size = = 0 ) ) {
if ( ! mp_bluetooth_gatts_on_read_request ( connection_handle , att_handle ) ) {
DEBUG_printf ( " att_read_callback: read request denied \n " ) ;
return 0 ;
}
}
uint16_t ret = att_read_callback_handle_blob ( entry - > data , entry - > data_len , offset , buffer , buffer_size ) ;
return ret ;
}
static int att_write_callback ( hci_con_handle_t connection_handle , uint16_t att_handle , uint16_t transaction_mode , uint16_t offset , uint8_t * buffer , uint16_t buffer_size ) {
( void ) offset ;
( void ) transaction_mode ;
DEBUG_printf ( " att_write_callback (handle: %u, mode: %u, offset: %u, buffer: %p, size: %u) \n " , att_handle , transaction_mode , offset , buffer , buffer_size ) ;
mp_bluetooth_gatts_db_entry_t * entry = mp_bluetooth_gatts_db_lookup ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , att_handle ) ;
if ( ! entry ) {
DEBUG_printf ( " att_write_callback handle not found \n " ) ;
return 0 ; // TODO: Find status code for not-found.
}
// TODO: Use `offset` arg.
size_t append_offset = 0 ;
if ( entry - > append ) {
append_offset = entry - > data_len ;
}
entry - > data_len = MIN ( entry - > data_alloc , buffer_size + append_offset ) ;
memcpy ( entry - > data + append_offset , buffer , entry - > data_len - append_offset ) ;
uint16_t handle_uuid = att_uuid_for_handle ( att_handle ) ;
if ( handle_uuid ! = GATT_CLIENT_CHARACTERISTICS_CONFIGURATION ) {
// Suppress the Python callback for writes to the CCCD.
mp_bluetooth_gatts_on_write ( connection_handle , att_handle ) ;
}
return 0 ;
}
static inline uint16_t get_uuid16 ( const mp_obj_bluetooth_uuid_t * uuid ) {
return ( uuid - > data [ 1 ] < < 8 ) | uuid - > data [ 0 ] ;
}
// Map MP_BLUETOOTH_CHARACTERISTIC_FLAG_ values to btstack read/write permission values.
static void get_characteristic_permissions ( uint16_t flags , uint16_t * read_permission , uint16_t * write_permission ) {
if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_READ_ENCRYPTED ) {
* read_permission = ATT_SECURITY_ENCRYPTED ;
} else if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_READ_AUTHENTICATED ) {
* read_permission = ATT_SECURITY_AUTHENTICATED ;
} else if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_READ_AUTHORIZED ) {
* read_permission = ATT_SECURITY_AUTHORIZED ;
} else {
* read_permission = ATT_SECURITY_NONE ;
}
if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_WRITE_ENCRYPTED ) {
* write_permission = ATT_SECURITY_ENCRYPTED ;
} else if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_WRITE_AUTHENTICATED ) {
* write_permission = ATT_SECURITY_AUTHENTICATED ;
} else if ( flags & MP_BLUETOOTH_CHARACTERISTIC_FLAG_WRITE_AUTHORIZED ) {
* write_permission = ATT_SECURITY_AUTHORIZED ;
} else {
* write_permission = ATT_SECURITY_NONE ;
}
}
int mp_bluetooth_gatts_register_service ( mp_obj_bluetooth_uuid_t * service_uuid , mp_obj_bluetooth_uuid_t * * characteristic_uuids , uint16_t * characteristic_flags , mp_obj_bluetooth_uuid_t * * descriptor_uuids , uint16_t * descriptor_flags , uint8_t * num_descriptors , uint16_t * handles , size_t num_characteristics ) {
DEBUG_printf ( " mp_bluetooth_gatts_register_service \n " ) ;
// Note: btstack expects BE UUIDs (which it immediately convertes to LE).
// So we have to convert all our modbluetooth LE UUIDs to BE just for the att_db_util_add_* methods (using get_uuid16 above, and reverse_128 from btstackutil.h).
// TODO: btstack's att_db_util_add_* methods have no bounds checking or validation.
// Need some way to prevent additional services being added if we're out of space in the static buffer.
if ( service_uuid - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
att_db_util_add_service_uuid16 ( get_uuid16 ( service_uuid ) ) ;
} else if ( service_uuid - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
uint8_t buffer [ 16 ] ;
reverse_128 ( service_uuid - > data , buffer ) ;
att_db_util_add_service_uuid128 ( buffer ) ;
} else {
return MP_EINVAL ;
}
size_t handle_index = 0 ;
size_t descriptor_index = 0 ;
static uint8_t cccd_buf [ 2 ] = { 0 } ;
for ( size_t i = 0 ; i < num_characteristics ; + + i ) {
uint16_t props = ( characteristic_flags [ i ] & 0x7f ) | ATT_PROPERTY_DYNAMIC ;
uint16_t read_permission , write_permission ;
get_characteristic_permissions ( characteristic_flags [ i ] , & read_permission , & write_permission ) ;
if ( characteristic_uuids [ i ] - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
handles [ handle_index ] = att_db_util_add_characteristic_uuid16 ( get_uuid16 ( characteristic_uuids [ i ] ) , props , read_permission , write_permission , NULL , 0 ) ;
} else if ( characteristic_uuids [ i ] - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
uint8_t buffer [ 16 ] ;
reverse_128 ( characteristic_uuids [ i ] - > data , buffer ) ;
handles [ handle_index ] = att_db_util_add_characteristic_uuid128 ( buffer , props , read_permission , write_permission , NULL , 0 ) ;
} else {
return MP_EINVAL ;
}
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] , MP_BLUETOOTH_DEFAULT_ATTR_LEN ) ;
// If a NOTIFY or INDICATE characteristic is added, then we need to manage a value for the CCCD.
if ( props & ( ATT_PROPERTY_NOTIFY | ATT_PROPERTY_INDICATE ) ) {
// btstack automatically creates the CCCD as the next handle if the notify or indicate properties are set.
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] + 1 , MP_BLUETOOTH_CCCD_LEN ) ;
int ret = mp_bluetooth_gatts_db_write ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] + 1 , cccd_buf , sizeof ( cccd_buf ) ) ;
if ( ret ) {
return ret ;
}
}
DEBUG_printf ( " mp_bluetooth_gatts_register_service: Registered char with handle %u \n " , handles [ handle_index ] ) ;
+ + handle_index ;
for ( size_t j = 0 ; j < num_descriptors [ i ] ; + + j ) {
props = ( descriptor_flags [ descriptor_index ] & 0x7f ) | ATT_PROPERTY_DYNAMIC ;
get_characteristic_permissions ( descriptor_flags [ descriptor_index ] , & read_permission , & write_permission ) ;
if ( descriptor_uuids [ descriptor_index ] - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
handles [ handle_index ] = att_db_util_add_descriptor_uuid16 ( get_uuid16 ( descriptor_uuids [ descriptor_index ] ) , props , read_permission , write_permission , NULL , 0 ) ;
} else if ( descriptor_uuids [ descriptor_index ] - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
uint8_t buffer [ 16 ] ;
reverse_128 ( descriptor_uuids [ descriptor_index ] - > data , buffer ) ;
handles [ handle_index ] = att_db_util_add_descriptor_uuid128 ( buffer , props , read_permission , write_permission , NULL , 0 ) ;
} else {
return MP_EINVAL ;
}
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] , MP_BLUETOOTH_DEFAULT_ATTR_LEN ) ;
DEBUG_printf ( " mp_bluetooth_gatts_register_service: Registered desc with handle %u \n " , handles [ handle_index ] ) ;
+ + descriptor_index ;
+ + handle_index ;
}
}
return 0 ;
}
int mp_bluetooth_gatts_register_service_end ( void ) {
DEBUG_printf ( " mp_bluetooth_gatts_register_service_end \n " ) ;
att_server_init ( att_db_util_get_address ( ) , & att_read_callback , & att_write_callback ) ;
return 0 ;
}
int mp_bluetooth_gatts_read ( uint16_t value_handle , const uint8_t * * value , size_t * value_len ) {
DEBUG_printf ( " mp_bluetooth_gatts_read \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
return mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , value , value_len ) ;
}
int mp_bluetooth_gatts_write ( uint16_t value_handle , const uint8_t * value , size_t value_len , bool send_update ) {
DEBUG_printf ( " mp_bluetooth_gatts_write \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
if ( send_update ) {
DEBUG_printf ( " --> send_update \n " ) ;
// If a characteristic has notify or indicate set, then btstack automatically creates the CCCD as the next handle.
// So if the next handle is a CCCD, then this characteristic must have had notify/indicate set.
uint16_t next_handle_uuid = att_uuid_for_handle ( value_handle + 1 ) ;
if ( next_handle_uuid ! = GATT_CLIENT_CHARACTERISTICS_CONFIGURATION ) {
return MP_EINVAL ;
}
DEBUG_printf ( " --> got handle for cccd: %d \n " , value_handle + 1 ) ;
}
int err = mp_bluetooth_gatts_db_write ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , value , value_len ) ;
if ( ! send_update | | err ) {
return err ;
}
// Read the CCCD value. TODO: These should be per-connection.
const uint8_t * cccd ;
size_t cccd_len ;
err = mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle + 1 , & cccd , & cccd_len ) ;
if ( cccd_len ! = 2 | | err ) {
return err ;
}
// Notify/indicate all active connections.
btstack_linked_list_iterator_t it ;
hci_connections_get_iterator ( & it ) ;
while ( btstack_linked_list_iterator_has_next ( & it ) ) {
hci_connection_t * connection = ( hci_connection_t * ) btstack_linked_list_iterator_next ( & it ) ;
if ( cccd [ 0 ] & 1 ) {
err = mp_bluetooth_gatts_notify_indicate ( connection - > con_handle , value_handle , MP_BLUETOOTH_GATTS_OP_NOTIFY , value , value_len ) ;
if ( err ) {
return err ;
}
}
if ( cccd [ 0 ] & 2 ) {
err = mp_bluetooth_gatts_notify_indicate ( connection - > con_handle , value_handle , MP_BLUETOOTH_GATTS_OP_INDICATE , value , value_len ) ;
if ( err ) {
return err ;
}
}
}
return 0 ;
}
# if !MICROPY_TRACKED_ALLOC
# error "btstack requires MICROPY_TRACKED_ALLOC"
# endif
typedef struct {
btstack_context_callback_registration_t btstack_registration ;
int gatts_op ;
uint16_t conn_handle ;
uint16_t value_handle ;
size_t value_len ;
uint8_t value [ ] ;
} notify_indicate_pending_op_t ;
// Called in response to a gatts_notify/indicate being unable to complete, which then calls
// att_server_request_to_send_notification.
static void btstack_notify_indicate_ready_handler ( void * context ) {
MICROPY_PY_BLUETOOTH_ENTER
notify_indicate_pending_op_t * pending_op = ( notify_indicate_pending_op_t * ) context ;
DEBUG_printf ( " btstack_notify_indicate_ready_handler gatts_op=%d conn_handle=%d value_handle=%d len=%lu \n " , pending_op - > gatts_op , pending_op - > conn_handle , pending_op - > value_handle , pending_op - > value_len ) ;
int err = ERROR_CODE_SUCCESS ;
switch ( pending_op - > gatts_op ) {
case MP_BLUETOOTH_GATTS_OP_NOTIFY :
err = att_server_notify ( pending_op - > conn_handle , pending_op - > value_handle , pending_op - > value , pending_op - > value_len ) ;
DEBUG_printf ( " btstack_notify_indicate_ready_handler: sending notification err=%d \n " , err ) ;
break ;
case MP_BLUETOOTH_GATTS_OP_INDICATE :
err = att_server_indicate ( pending_op - > conn_handle , pending_op - > value_handle , pending_op - > value , pending_op - > value_len ) ;
DEBUG_printf ( " btstack_notify_indicate_ready_handler: sending indication err=%d \n " , err ) ;
break ;
}
assert ( err = = ERROR_CODE_SUCCESS ) ;
( void ) err ;
MICROPY_PY_BLUETOOTH_EXIT
m_tracked_free ( pending_op ) ;
}
int mp_bluetooth_gatts_notify_indicate ( uint16_t conn_handle , uint16_t value_handle , int gatts_op , const uint8_t * value , size_t value_len ) {
DEBUG_printf ( " mp_bluetooth_gatts_notify_indicate: gatts_op=%d \n " , gatts_op ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
if ( ! value ) {
// NULL value means "use DB value".
mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , & value , & value_len ) ;
}
// Even if a lower MTU is negotiated, btstack allows sending a larger
// notification/indication. Truncate at the MTU-3 (to match NimBLE).
uint16_t current_mtu = att_server_get_mtu ( conn_handle ) ;
if ( current_mtu ) {
current_mtu - = 3 ;
value_len = MIN ( value_len , current_mtu ) ;
}
int err = ERROR_CODE_UNKNOWN_HCI_COMMAND ;
// Attempt to send immediately. If it succeeds, btstack will copy the buffer.
MICROPY_PY_BLUETOOTH_ENTER
switch ( gatts_op ) {
case MP_BLUETOOTH_GATTS_OP_NOTIFY :
err = att_server_notify ( conn_handle , value_handle , value , value_len ) ;
break ;
case MP_BLUETOOTH_GATTS_OP_INDICATE :
// Indicate will raise ATT_EVENT_HANDLE_VALUE_INDICATION_COMPLETE when
// acknowledged (or timeout/error).
err = att_server_indicate ( conn_handle , value_handle , value , value_len ) ;
break ;
}
MICROPY_PY_BLUETOOTH_EXIT
if ( err = = BTSTACK_ACL_BUFFERS_FULL | | err = = ATT_HANDLE_VALUE_INDICATION_IN_PROGRESS ) {
DEBUG_printf ( " mp_bluetooth_gatts_notify_indicate: ACL buffer full / indication in progress, scheduling callback \n " ) ;
// Copy the value and ask btstack to let us know when it can be sent.
notify_indicate_pending_op_t * pending_op = m_tracked_calloc ( 1 , sizeof ( notify_indicate_pending_op_t ) + value_len ) ;
pending_op - > btstack_registration . context = pending_op ;
pending_op - > btstack_registration . callback = & btstack_notify_indicate_ready_handler ;
pending_op - > gatts_op = gatts_op ;
pending_op - > conn_handle = conn_handle ;
pending_op - > value_handle = value_handle ;
pending_op - > value_len = value_len ;
memcpy ( pending_op - > value , value , value_len ) ;
MICROPY_PY_BLUETOOTH_ENTER
switch ( gatts_op ) {
case MP_BLUETOOTH_GATTS_OP_NOTIFY :
err = att_server_request_to_send_notification ( & pending_op - > btstack_registration , conn_handle ) ;
break ;
case MP_BLUETOOTH_GATTS_OP_INDICATE :
err = att_server_request_to_send_indication ( & pending_op - > btstack_registration , conn_handle ) ;
break ;
}
MICROPY_PY_BLUETOOTH_EXIT
if ( err ! = ERROR_CODE_SUCCESS ) {
m_tracked_free ( pending_op ) ;
}
}
return btstack_error_to_errno ( err ) ;
}
int mp_bluetooth_gatts_set_buffer ( uint16_t value_handle , size_t len , bool append ) {
DEBUG_printf ( " mp_bluetooth_gatts_set_buffer \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
return mp_bluetooth_gatts_db_resize ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , len , append ) ;
}
int mp_bluetooth_get_preferred_mtu ( void ) {
if ( ! mp_bluetooth_is_active ( ) ) {
mp_raise_OSError ( ERRNO_BLUETOOTH_NOT_ACTIVE ) ;
}
return l2cap_max_le_mtu ( ) ;
}
int mp_bluetooth_set_preferred_mtu ( uint16_t mtu ) {
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
l2cap_set_max_le_mtu ( mtu ) ;
if ( l2cap_max_le_mtu ( ) ! = mtu ) {
return MP_EINVAL ;
}
return 0 ;
}
int mp_bluetooth_gap_disconnect ( uint16_t conn_handle ) {
DEBUG_printf ( " mp_bluetooth_gap_disconnect \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
gap_disconnect ( conn_handle ) ;
return 0 ;
}
# if MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
int mp_bluetooth_gap_pair ( uint16_t conn_handle ) {
DEBUG_printf ( " mp_bluetooth_gap_pair: conn_handle=%d \n " , conn_handle ) ;
sm_request_pairing ( conn_handle ) ;
return 0 ;
}
int mp_bluetooth_gap_passkey ( uint16_t conn_handle , uint8_t action , mp_int_t passkey ) {
DEBUG_printf ( " mp_bluetooth_gap_passkey: conn_handle=%d action=%d passkey=%d \n " , conn_handle , action , ( int ) passkey ) ;
return MP_EOPNOTSUPP ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_PAIRING_BONDING
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
static btstack_timer_source_t scan_duration_timeout ;
static void scan_duration_timeout_handler ( btstack_timer_source_t * ds ) {
( void ) ds ;
mp_bluetooth_gap_scan_stop ( ) ;
}
int mp_bluetooth_gap_scan_start ( int32_t duration_ms , int32_t interval_us , int32_t window_us , bool active_scan ) {
DEBUG_printf ( " mp_bluetooth_gap_scan_start \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
if ( duration_ms > 0 ) {
btstack_run_loop_set_timer ( & scan_duration_timeout , duration_ms ) ;
btstack_run_loop_set_timer_handler ( & scan_duration_timeout , scan_duration_timeout_handler ) ;
btstack_run_loop_add_timer ( & scan_duration_timeout ) ;
}
gap_set_scan_parameters ( active_scan ? 1 : 0 , interval_us / 625 , window_us / 625 ) ;
gap_start_scan ( ) ;
return 0 ;
}
int mp_bluetooth_gap_scan_stop ( void ) {
DEBUG_printf ( " mp_bluetooth_gap_scan_stop \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
btstack_run_loop_remove_timer ( & scan_duration_timeout ) ;
gap_stop_scan ( ) ;
mp_bluetooth_gap_on_scan_complete ( ) ;
return 0 ;
}
int mp_bluetooth_gap_peripheral_connect ( uint8_t addr_type , const uint8_t * addr , int32_t duration_ms , int32_t min_conn_interval_us , int32_t max_conn_interval_us ) {
DEBUG_printf ( " mp_bluetooth_gap_peripheral_connect \n " ) ;
uint16_t conn_scan_interval = 60000 / 625 ;
uint16_t conn_scan_window = 30000 / 625 ;
uint16_t conn_interval_min = ( min_conn_interval_us ? min_conn_interval_us : 10000 ) / 1250 ;
uint16_t conn_interval_max = ( max_conn_interval_us ? max_conn_interval_us : 30000 ) / 1250 ;
uint16_t conn_latency = 4 ;
uint16_t supervision_timeout = duration_ms / 10 ; // default = 720
uint16_t min_ce_length = 10000 / 625 ;
uint16_t max_ce_length = 30000 / 625 ;
gap_set_connection_parameters ( conn_scan_interval , conn_scan_window , conn_interval_min , conn_interval_max , conn_latency , supervision_timeout , min_ce_length , max_ce_length ) ;
bd_addr_t btstack_addr ;
memcpy ( btstack_addr , addr , BD_ADDR_LEN ) ;
return btstack_error_to_errno ( gap_connect ( btstack_addr , addr_type ) ) ;
}
int mp_bluetooth_gap_peripheral_connect_cancel ( void ) {
DEBUG_printf ( " mp_bluetooth_gap_peripheral_connect_cancel \n " ) ;
return btstack_error_to_errno ( gap_connect_cancel ( ) ) ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
# if MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
int mp_bluetooth_gattc_discover_primary_services ( uint16_t conn_handle , const mp_obj_bluetooth_uuid_t * uuid ) {
DEBUG_printf ( " mp_bluetooth_gattc_discover_primary_services \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
uint8_t err ;
if ( uuid ) {
if ( uuid - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
err = gatt_client_discover_primary_services_by_uuid16 ( & btstack_packet_handler_discover_services , conn_handle , get_uuid16 ( uuid ) ) ;
} else if ( uuid - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
uint8_t buffer [ 16 ] ;
reverse_128 ( uuid - > data , buffer ) ;
err = gatt_client_discover_primary_services_by_uuid128 ( & btstack_packet_handler_discover_services , conn_handle , buffer ) ;
} else {
DEBUG_printf ( " --> unknown UUID size \n " ) ;
return MP_EINVAL ;
}
} else {
err = gatt_client_discover_primary_services ( & btstack_packet_handler_discover_services , conn_handle ) ;
}
return btstack_error_to_errno ( err ) ;
}
int mp_bluetooth_gattc_discover_characteristics ( uint16_t conn_handle , uint16_t start_handle , uint16_t end_handle , const mp_obj_bluetooth_uuid_t * uuid ) {
DEBUG_printf ( " mp_bluetooth_gattc_discover_characteristics \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
gatt_client_service_t service = {
// Only start/end handles needed for gatt_client_discover_characteristics_for_service.
. start_group_handle = start_handle ,
. end_group_handle = end_handle ,
. uuid16 = 0 ,
. uuid128 = { 0 } ,
} ;
uint8_t err ;
if ( uuid ) {
if ( uuid - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
err = gatt_client_discover_characteristics_for_service_by_uuid16 ( & btstack_packet_handler_discover_characteristics , conn_handle , & service , get_uuid16 ( uuid ) ) ;
} else if ( uuid - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
uint8_t buffer [ 16 ] ;
reverse_128 ( uuid - > data , buffer ) ;
err = gatt_client_discover_characteristics_for_service_by_uuid128 ( & btstack_packet_handler_discover_characteristics , conn_handle , & service , buffer ) ;
} else {
DEBUG_printf ( " --> unknown UUID size \n " ) ;
return MP_EINVAL ;
}
} else {
err = gatt_client_discover_characteristics_for_service ( & btstack_packet_handler_discover_characteristics , conn_handle , & service ) ;
}
return btstack_error_to_errno ( err ) ;
}
int mp_bluetooth_gattc_discover_descriptors ( uint16_t conn_handle , uint16_t start_handle , uint16_t end_handle ) {
DEBUG_printf ( " mp_bluetooth_gattc_discover_descriptors \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
gatt_client_characteristic_t characteristic = {
// Only value/end handles needed for gatt_client_discover_characteristic_descriptors.
. start_handle = 0 ,
. value_handle = start_handle ,
. end_handle = end_handle ,
. properties = 0 ,
. uuid16 = 0 ,
. uuid128 = { 0 } ,
} ;
return btstack_error_to_errno ( gatt_client_discover_characteristic_descriptors ( & btstack_packet_handler_discover_descriptors , conn_handle , & characteristic ) ) ;
}
int mp_bluetooth_gattc_read ( uint16_t conn_handle , uint16_t value_handle ) {
DEBUG_printf ( " mp_bluetooth_gattc_read \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
// There can only be a single pending GATT client operation per connection.
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( ! conn ) {
DEBUG_printf ( " --> no active connection %d \n " , conn_handle ) ;
return MP_ENOTCONN ;
}
if ( conn - > pending_value_handle ! = 0xffff ) {
// There's either a read in progress, a write-with-response in progress, or a pending can-write-without-response request outstanding.
DEBUG_printf ( " --> busy \n " ) ;
return MP_EALREADY ;
}
conn - > pending_value_handle = value_handle ;
int err = gatt_client_read_value_of_characteristic_using_value_handle ( & btstack_packet_handler_read , conn_handle , value_handle ) ;
if ( err ! = ERROR_CODE_SUCCESS ) {
DEBUG_printf ( " --> can't send read %d \n " , err ) ;
conn - > pending_value_handle = 0xffff ;
}
return btstack_error_to_errno ( err ) ;
}
int mp_bluetooth_gattc_write ( uint16_t conn_handle , uint16_t value_handle , const uint8_t * value , size_t value_len , unsigned int mode ) {
DEBUG_printf ( " mp_bluetooth_gattc_write \n " ) ;
if ( ! mp_bluetooth_is_active ( ) ) {
return ERRNO_BLUETOOTH_NOT_ACTIVE ;
}
// Note: We should be distinguishing between gatt_client_write_value_of_characteristic vs
// gatt_client_write_characteristic_descriptor_using_descriptor_handle.
// However both are implemented using send_gatt_write_attribute_value_request under the hood,
// and we get the exact same event to the packet handler.
// Same story for the "without response" version.
int err ;
if ( mode = = MP_BLUETOOTH_WRITE_MODE_NO_RESPONSE ) {
// Simplest case -- if the write can be dispatched directly, then the buffer is copied directly to the ACL buffer.
err = gatt_client_write_value_of_characteristic_without_response ( conn_handle , value_handle , value_len , ( uint8_t * ) value ) ;
if ( err ! = GATT_CLIENT_BUSY ) {
DEBUG_printf ( " --> can't send write-without-response %d \n " , err ) ;
return btstack_error_to_errno ( err ) ;
}
}
// There can only be a single pending read/write request per connection.
mp_btstack_active_connection_t * conn = find_active_connection ( conn_handle ) ;
if ( ! conn ) {
DEBUG_printf ( " --> no active connection %d \n " , conn_handle ) ;
return MP_ENOTCONN ;
}
if ( conn - > pending_value_handle ! = 0xffff ) {
// There's either a read in progress, a write-with-response in progress, or a pending can-write-without-response request outstanding.
DEBUG_printf ( " --> busy \n " ) ;
return MP_EALREADY ;
}
conn - > pending_value_handle = value_handle ;
conn - > pending_write_value_len = value_len ;
conn - > pending_write_value = m_new ( uint8_t , value_len ) ;
memcpy ( conn - > pending_write_value , value , value_len ) ;
if ( mode = = MP_BLUETOOTH_WRITE_MODE_NO_RESPONSE ) {
DEBUG_printf ( " --> client busy \n " ) ;
// Raise the GATT_EVENT_CAN_WRITE_WITHOUT_RESPONSE event when
// write-without-response will succeed. The only way this fails is if
// there's an outstanding request (unlike for the server-equivalent,
// att_server_request_to_send_notification, which has a queue) but
// we've already checked that there isn't one.
err = gatt_client_request_can_write_without_response_event ( & btstack_packet_handler_generic , conn_handle ) ;
} else if ( mode = = MP_BLUETOOTH_WRITE_MODE_WITH_RESPONSE ) {
// Attempt to write immediately. This can fail if there's another
// client operation in progress (e.g. discover).
err = gatt_client_write_value_of_characteristic ( & btstack_packet_handler_write_with_response , conn_handle , value_handle , value_len , conn - > pending_write_value ) ;
} else {
return MP_EINVAL ;
}
if ( err ! = ERROR_CODE_SUCCESS ) {
DEBUG_printf ( " --> write failed %d \n " , err ) ;
// We knew that there was no read/write in progress, but some other
// client operation is in progress, so release the pending state.
m_del ( uint8_t , conn - > pending_write_value , value_len ) ;
conn - > pending_write_value_len = 0 ;
conn - > pending_value_handle = 0xffff ;
}
return btstack_error_to_errno ( err ) ;
}
int mp_bluetooth_gattc_exchange_mtu ( uint16_t conn_handle ) {
DEBUG_printf ( " mp_bluetooth_gattc_exchange_mtu: conn_handle=%d mtu=%d \n " , conn_handle , l2cap_max_le_mtu ( ) ) ;
gatt_client_send_mtu_negotiation ( & btstack_packet_handler_generic , conn_handle ) ;
return 0 ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_GATT_CLIENT
# if MICROPY_PY_BLUETOOTH_ENABLE_L2CAP_CHANNELS
int mp_bluetooth_l2cap_listen ( uint16_t psm , uint16_t mtu ) {
DEBUG_printf ( " mp_bluetooth_l2cap_listen: psm=%d, mtu=%d \n " , psm , mtu ) ;
return MP_EOPNOTSUPP ;
}
int mp_bluetooth_l2cap_connect ( uint16_t conn_handle , uint16_t psm , uint16_t mtu ) {
DEBUG_printf ( " mp_bluetooth_l2cap_connect: conn_handle=%d, psm=%d, mtu=%d \n " , conn_handle , psm , mtu ) ;
return MP_EOPNOTSUPP ;
}
int mp_bluetooth_l2cap_disconnect ( uint16_t conn_handle , uint16_t cid ) {
DEBUG_printf ( " mp_bluetooth_l2cap_disconnect: conn_handle=%d, cid=%d \n " , conn_handle , cid ) ;
return MP_EOPNOTSUPP ;
}
int mp_bluetooth_l2cap_send ( uint16_t conn_handle , uint16_t cid , const uint8_t * buf , size_t len , bool * stalled ) {
DEBUG_printf ( " mp_bluetooth_l2cap_send: conn_handle=%d, cid=%d, len=%d \n " , conn_handle , cid , ( int ) len ) ;
return MP_EOPNOTSUPP ;
}
int mp_bluetooth_l2cap_recvinto ( uint16_t conn_handle , uint16_t cid , uint8_t * buf , size_t * len ) {
DEBUG_printf ( " mp_bluetooth_l2cap_recvinto: conn_handle=%d, cid=%d, len=%d \n " , conn_handle , cid , ( int ) * len ) ;
return MP_EOPNOTSUPP ;
}
# endif // MICROPY_PY_BLUETOOTH_ENABLE_L2CAP_CHANNELS
MP_REGISTER_ROOT_POINTER ( struct _mp_bluetooth_btstack_root_pointers_t * bluetooth_btstack_root_pointers ) ;
# endif // MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_BTSTACK