2020-02-20 03:40:55 +00:00
/*
* 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 .
*/
2020-02-20 03:43:01 +00:00
# include "py/runtime.h"
# include "py/mperrno.h"
# include "py/mphal.h"
2020-02-20 03:40:55 +00:00
# if MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_BTSTACK
# include "extmod/btstack/modbluetooth_btstack.h"
# include "extmod/modbluetooth.h"
2020-02-20 03:43:01 +00:00
# include "lib/btstack/src/btstack.h"
2020-02-20 03:43:52 +00:00
# define DEBUG_EVENT_printf(...) //printf(__VA_ARGS__)
2020-02-20 03:43:01 +00:00
volatile int mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
2020-02-20 03:44:13 +00:00
STATIC btstack_packet_callback_registration_t hci_event_callback_registration ;
2020-02-20 03:43:28 +00:00
2020-02-20 03:43:52 +00:00
STATIC int btstack_error_to_errno ( int err ) {
if ( err = = ERROR_CODE_SUCCESS ) {
return 0 ;
} else if ( err = = BTSTACK_ACL_BUFFERS_FULL ) {
return MP_ENOMEM ;
} else {
return MP_EINVAL ;
}
}
2020-02-20 03:44:13 +00:00
STATIC mp_obj_bluetooth_uuid_t create_mp_uuid ( uint16_t uuid16 , const uint8_t * uuid128 ) {
mp_obj_bluetooth_uuid_t result ;
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 ;
}
STATIC void btstack_packet_handler ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
DEBUG_EVENT_printf ( " btstack_packet_handler(packet_type=%u, channel=%u, packet=%p, size=%u) \n " , packet_type , channel , packet , size ) ;
if ( packet_type ! = HCI_EVENT_PACKET ) {
return ;
}
uint8_t event_type = hci_event_packet_get_type ( packet ) ;
if ( event_type = = ATT_EVENT_CONNECTED ) {
DEBUG_EVENT_printf ( " --> att connected \n " ) ;
} else if ( event_type = = ATT_EVENT_DISCONNECTED ) {
DEBUG_EVENT_printf ( " --> att disconnected \n " ) ;
} else if ( event_type = = HCI_EVENT_LE_META ) {
DEBUG_EVENT_printf ( " --> hci le meta \n " ) ;
if ( hci_event_le_meta_get_subevent_code ( packet ) = = 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 ) ;
2020-02-20 03:43:52 +00:00
bd_addr_t addr ;
2020-02-20 03:44:13 +00:00
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 ;
}
mp_bluetooth_gap_on_connected_disconnected ( irq_event , conn_handle , addr_type , addr ) ;
}
} else if ( event_type = = BTSTACK_EVENT_STATE ) {
DEBUG_EVENT_printf ( " --> btstack event state 0x%02x \n " , btstack_event_state_get_state ( packet ) ) ;
} else if ( event_type = = HCI_EVENT_TRANSPORT_PACKET_SENT ) {
DEBUG_EVENT_printf ( " --> hci transport packet set \n " ) ;
} else if ( event_type = = HCI_EVENT_COMMAND_COMPLETE ) {
DEBUG_EVENT_printf ( " --> hci command complete \n " ) ;
} else if ( event_type = = HCI_EVENT_COMMAND_STATUS ) {
DEBUG_EVENT_printf ( " --> hci command status \n " ) ;
} else if ( event_type = = HCI_EVENT_NUMBER_OF_COMPLETED_PACKETS ) {
DEBUG_EVENT_printf ( " --> hci number of completed packets \n " ) ;
} else if ( event_type = = BTSTACK_EVENT_NR_CONNECTIONS_CHANGED ) {
DEBUG_EVENT_printf ( " --> btstack # conns changed \n " ) ;
} else if ( event_type = = HCI_EVENT_VENDOR_SPECIFIC ) {
DEBUG_EVENT_printf ( " --> hci vendor specific \n " ) ;
} else if ( event_type = = GAP_EVENT_ADVERTISING_REPORT ) {
DEBUG_EVENT_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 ) ;
2020-04-05 06:31:53 +01:00
mp_bluetooth_gap_on_scan_result ( address_type , address , adv_event_type , rssi , data , length ) ;
2020-02-20 03:44:13 +00:00
} else if ( event_type = = HCI_EVENT_DISCONNECTION_COMPLETE ) {
DEBUG_EVENT_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 ;
2020-02-20 03:43:28 +00:00
} else {
2020-02-20 03:44:13 +00:00
// Slave role.
irq_event = MP_BLUETOOTH_IRQ_CENTRAL_DISCONNECT ;
2020-02-20 03:43:28 +00:00
}
2020-02-20 03:44:13 +00:00
uint8_t addr [ 6 ] = { 0 } ;
mp_bluetooth_gap_on_connected_disconnected ( irq_event , conn_handle , 0xff , addr ) ;
2020-03-06 01:37:37 +00:00
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
2020-02-20 03:44:13 +00:00
} else if ( event_type = = GATT_EVENT_QUERY_COMPLETE ) {
DEBUG_EVENT_printf ( " --> gatt query complete \n " ) ;
} else if ( event_type = = GATT_EVENT_SERVICE_QUERY_RESULT ) {
DEBUG_EVENT_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_CHARACTERISTIC_QUERY_RESULT ) {
DEBUG_EVENT_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 . start_handle , characteristic . value_handle , characteristic . properties , & characteristic_uuid ) ;
} else if ( event_type = = GATT_EVENT_CHARACTERISTIC_DESCRIPTOR_QUERY_RESULT ) {
DEBUG_EVENT_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_CHARACTERISTIC_VALUE_QUERY_RESULT ) {
DEBUG_EVENT_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 ) ;
2020-04-07 05:58:50 +01:00
mp_uint_t atomic_state ;
len = mp_bluetooth_gattc_on_data_available_start ( MP_BLUETOOTH_IRQ_GATTC_READ_RESULT , conn_handle , value_handle , len , & atomic_state ) ;
2020-02-20 03:44:13 +00:00
mp_bluetooth_gattc_on_data_available_chunk ( data , len ) ;
2020-04-07 05:58:50 +01:00
mp_bluetooth_gattc_on_data_available_end ( atomic_state ) ;
2020-03-06 01:37:37 +00:00
} else if ( event_type = = GATT_EVENT_NOTIFICATION ) {
DEBUG_EVENT_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 ) ;
2020-04-07 05:58:50 +01:00
mp_uint_t atomic_state ;
len = mp_bluetooth_gattc_on_data_available_start ( MP_BLUETOOTH_IRQ_GATTC_NOTIFY , conn_handle , value_handle , len , & atomic_state ) ;
2020-03-06 01:37:37 +00:00
mp_bluetooth_gattc_on_data_available_chunk ( data , len ) ;
2020-04-07 05:58:50 +01:00
mp_bluetooth_gattc_on_data_available_end ( atomic_state ) ;
2020-03-06 01:37:37 +00:00
} else if ( event_type = = GATT_EVENT_INDICATION ) {
DEBUG_EVENT_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 ) ;
2020-04-07 05:58:50 +01:00
mp_uint_t atomic_state ;
len = mp_bluetooth_gattc_on_data_available_start ( MP_BLUETOOTH_IRQ_GATTC_INDICATE , conn_handle , value_handle , len , & atomic_state ) ;
2020-03-06 01:37:37 +00:00
mp_bluetooth_gattc_on_data_available_chunk ( data , len ) ;
2020-04-07 05:58:50 +01:00
mp_bluetooth_gattc_on_data_available_end ( atomic_state ) ;
2020-03-06 01:37:37 +00:00
# endif
2020-02-20 03:44:13 +00:00
} else {
DEBUG_EVENT_printf ( " --> hci event type: unknown (0x%02x) \n " , event_type ) ;
2020-02-20 03:43:28 +00:00
}
}
2020-02-20 03:44:13 +00:00
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
STATIC void btstack_packet_handler_write_with_response ( uint8_t packet_type , uint16_t channel , uint8_t * packet , uint16_t size ) {
DEBUG_EVENT_printf ( " btstack_packet_handler_write_with_response(packet_type=%u, channel=%u, packet=%p, size=%u) \n " , packet_type , channel , packet , 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 ) {
DEBUG_EVENT_printf ( " --> gatt query complete \n " ) ;
uint16_t conn_handle = gatt_event_query_complete_get_handle ( packet ) ;
uint8_t status = gatt_event_query_complete_get_att_status ( packet ) ;
// TODO there is no value_handle to pass here
mp_bluetooth_gattc_on_write_status ( conn_handle , 0 , status ) ;
2020-02-20 03:43:28 +00:00
}
}
2020-02-20 03:44:13 +00:00
# endif
2020-02-20 03:43:28 +00:00
2020-02-20 03:40:55 +00:00
int mp_bluetooth_init ( void ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_init \n " ) ;
2020-02-20 03:43:01 +00:00
btstack_memory_init ( ) ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) = m_new0 ( mp_bluetooth_btstack_root_pointers_t , 1 ) ;
2020-02-20 03:43:52 +00:00
mp_bluetooth_gatts_db_create ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db ) ;
2020-02-20 03:43:01 +00:00
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 ) ;
2020-02-20 03:44:13 +00:00
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
gatt_client_init ( ) ;
# endif
2020-02-20 03:43:01 +00:00
mp_bluetooth_btstack_port_start ( ) ;
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ;
2020-02-20 03:43:28 +00:00
// Register for HCI events.
memset ( & hci_event_callback_registration , 0 , sizeof ( btstack_packet_callback_registration_t ) ) ;
2020-02-20 03:44:13 +00:00
hci_event_callback_registration . callback = & btstack_packet_handler ;
2020-02-20 03:43:28 +00:00
hci_add_event_handler ( & hci_event_callback_registration ) ;
2020-03-06 01:37:37 +00:00
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
// 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 , GATT_CLIENT_ANY_CONNECTION , NULL ) ;
# endif
2020-02-20 03:40:55 +00:00
return 0 ;
}
void mp_bluetooth_deinit ( void ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_deinit \n " ) ;
2020-03-06 01:37:37 +00:00
if ( ! MP_STATE_PORT ( bluetooth_btstack_root_pointers ) ) {
return ;
}
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
// Remove our registration for notify/indicate.
gatt_client_stop_listening_for_characteristic_value_updates ( & MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > notification ) ;
# endif
2020-02-20 03:43:01 +00:00
mp_bluetooth_btstack_port_deinit ( ) ;
mp_bluetooth_btstack_state = MP_BLUETOOTH_BTSTACK_STATE_OFF ;
MP_STATE_PORT ( bluetooth_btstack_root_pointers ) = NULL ;
2020-02-20 03:40:55 +00:00
}
2020-02-24 04:45:57 +00:00
bool mp_bluetooth_is_active ( void ) {
2020-02-20 03:43:01 +00:00
return mp_bluetooth_btstack_state = = MP_BLUETOOTH_BTSTACK_STATE_ACTIVE ;
2020-02-20 03:40:55 +00:00
}
void mp_bluetooth_get_device_addr ( uint8_t * addr ) {
mp_hal_get_mac ( MP_HAL_MAC_BDADDR , addr ) ;
}
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 ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_advertise_start \n " ) ;
2020-02-20 03:43:01 +00:00
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 ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
void mp_bluetooth_gap_advertise_stop ( void ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_advertise_stop \n " ) ;
2020-02-20 03:43:01 +00:00
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 ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_register_service_begin ( bool append ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_register_service_begin \n " ) ;
2020-02-20 03:43:28 +00:00
if ( ! append ) {
// This will reset the DB.
// Becase 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 ) ;
att_db_util_add_characteristic_uuid16 ( GAP_DEVICE_NAME_UUID , ATT_PROPERTY_READ , ATT_SECURITY_NONE , ATT_SECURITY_NONE , ( uint8_t * ) " MPY BTSTACK " , 11 ) ;
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 ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " btstack: 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_EVENT_printf ( " btstack: att_read_callback handle not found \n " ) ;
return 0 ; // TODO: Find status code for not-found.
}
return att_read_callback_handle_blob ( entry - > data , entry - > data_len , offset , buffer , buffer_size ) ;
2020-02-20 03:43:28 +00:00
}
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 ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " btstack: 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_EVENT_printf ( " btstack: 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 ) ;
mp_bluetooth_gatts_on_write ( connection_handle , att_handle ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
2020-02-20 03:43:28 +00:00
STATIC inline uint16_t get_uuid16 ( const mp_obj_bluetooth_uuid_t * uuid ) {
return ( uuid - > data [ 1 ] < < 8 ) | uuid - > data [ 0 ] ;
}
2020-02-20 03:40:55 +00:00
int mp_bluetooth_gatts_register_service ( mp_obj_bluetooth_uuid_t * service_uuid , mp_obj_bluetooth_uuid_t * * characteristic_uuids , uint8_t * characteristic_flags , mp_obj_bluetooth_uuid_t * * descriptor_uuids , uint8_t * descriptor_flags , uint8_t * num_descriptors , uint16_t * handles , size_t num_characteristics ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_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.
2020-02-20 03:43:28 +00:00
if ( service_uuid - > type = = MP_BLUETOOTH_UUID_TYPE_16 ) {
2020-02-20 03:43:52 +00:00
att_db_util_add_service_uuid16 ( get_uuid16 ( service_uuid ) ) ;
2020-02-20 03:43:28 +00:00
} else if ( service_uuid - > type = = MP_BLUETOOTH_UUID_TYPE_128 ) {
2020-02-20 03:43:52 +00:00
uint8_t buffer [ 16 ] ;
reverse_128 ( service_uuid - > data , buffer ) ;
att_db_util_add_service_uuid128 ( buffer ) ;
2020-02-20 03:43:28 +00:00
} else {
return MP_EINVAL ;
}
size_t handle_index = 0 ;
size_t descriptor_index = 0 ;
2020-02-20 03:43:52 +00:00
static uint8_t cccb_buf [ 2 ] = { 0 } ;
2020-02-20 03:43:28 +00:00
for ( size_t i = 0 ; i < num_characteristics ; + + i ) {
uint16_t props = characteristic_flags [ i ] | ATT_PROPERTY_DYNAMIC ;
uint16_t read_permission = ATT_SECURITY_NONE ;
uint16_t write_permission = ATT_SECURITY_NONE ;
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 ) {
2020-02-20 03:43:52 +00:00
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 ) ;
2020-02-20 03:43:28 +00:00
} else {
return MP_EINVAL ;
}
2020-02-20 03:43:52 +00:00
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 CCCB.
if ( props & ( ATT_PROPERTY_NOTIFY | ATT_PROPERTY_INDICATE ) ) {
// btstack creates the CCCB as the next handle.
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] + 1 , MP_BLUETOOTH_CCCB_LEN ) ;
mp_bluetooth_gatts_db_write ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] + 1 , cccb_buf , sizeof ( cccb_buf ) ) ;
}
DEBUG_EVENT_printf ( " Registered char with handle %u \n " , handles [ handle_index ] ) ;
2020-02-20 03:43:28 +00:00
+ + handle_index ;
for ( size_t j = 0 ; j < num_descriptors [ i ] ; + + j ) {
uint16_t props = descriptor_flags [ descriptor_index ] | ATT_PROPERTY_DYNAMIC ;
uint16_t read_permission = ATT_SECURITY_NONE ;
uint16_t write_permission = ATT_SECURITY_NONE ;
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 ) {
2020-02-20 03:43:52 +00:00
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 ) ;
2020-02-20 03:43:28 +00:00
} else {
return MP_EINVAL ;
}
2020-02-20 03:43:52 +00:00
mp_bluetooth_gatts_db_create_entry ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , handles [ handle_index ] , MP_BLUETOOTH_DEFAULT_ATTR_LEN ) ;
DEBUG_EVENT_printf ( " Registered desc with handle %u \n " , handles [ handle_index ] ) ;
2020-02-20 03:43:28 +00:00
+ + descriptor_index ;
+ + handle_index ;
}
}
2020-02-20 03:40:55 +00:00
return 0 ;
}
int mp_bluetooth_gatts_register_service_end ( void ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_register_service_end \n " ) ;
2020-02-20 03:43:28 +00:00
att_server_init ( att_db_util_get_address ( ) , & att_read_callback , & att_write_callback ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
int mp_bluetooth_gatts_read ( uint16_t value_handle , uint8_t * * value , size_t * value_len ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_read \n " ) ;
return mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , value , value_len ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_write ( uint16_t value_handle , const uint8_t * value , size_t value_len ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_write \n " ) ;
return mp_bluetooth_gatts_db_write ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , value , value_len ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_notify ( uint16_t conn_handle , uint16_t value_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_notify \n " ) ;
// Note: btstack doesn't appear to support sending a notification without a value, so include the stored value.
uint8_t * data = NULL ;
size_t len = 0 ;
mp_bluetooth_gatts_db_read ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , & data , & len ) ;
return mp_bluetooth_gatts_notify_send ( conn_handle , value_handle , data , & len ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_notify_send ( uint16_t conn_handle , uint16_t value_handle , const uint8_t * value , size_t * value_len ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_notify_send \n " ) ;
// TODO: We need to use att_server_request_to_send_notification here as the stack may not be ready to send a notification.
int err = att_server_notify ( conn_handle , value_handle , value , * value_len ) ;
return btstack_error_to_errno ( err ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_indicate ( uint16_t conn_handle , uint16_t value_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_indicate \n " ) ;
return btstack_error_to_errno ( att_server_indicate ( conn_handle , value_handle , NULL , 0 ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gatts_set_buffer ( uint16_t value_handle , size_t len , bool append ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gatts_set_buffer \n " ) ;
return mp_bluetooth_gatts_db_resize ( MP_STATE_PORT ( bluetooth_btstack_root_pointers ) - > gatts_db , value_handle , len , append ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gap_disconnect ( uint16_t conn_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_disconnect \n " ) ;
gap_disconnect ( conn_handle ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
# if MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
2020-02-20 03:44:13 +00:00
STATIC btstack_timer_source_t scan_duration_timeout ;
STATIC void hci_initialization_timeout_handler ( btstack_timer_source_t * ds ) {
mp_bluetooth_gap_scan_stop ( ) ;
}
2020-02-20 03:40:55 +00:00
int mp_bluetooth_gap_scan_start ( int32_t duration_ms , int32_t interval_us , int32_t window_us ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_scan_start \n " ) ;
2020-02-20 03:44:13 +00:00
btstack_run_loop_set_timer ( & scan_duration_timeout , duration_ms ) ;
btstack_run_loop_set_timer_handler ( & scan_duration_timeout , hci_initialization_timeout_handler ) ;
btstack_run_loop_add_timer ( & scan_duration_timeout ) ;
// 0 = passive scan (we don't handle scan response).
gap_set_scan_parameters ( 0 , interval_us / 625 , window_us / 625 ) ;
gap_start_scan ( ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
int mp_bluetooth_gap_scan_stop ( void ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_scan_stop \n " ) ;
2020-02-20 03:44:13 +00:00
btstack_run_loop_remove_timer ( & scan_duration_timeout ) ;
gap_stop_scan ( ) ;
mp_bluetooth_gap_on_scan_complete ( ) ;
2020-02-20 03:40:55 +00:00
return 0 ;
}
int mp_bluetooth_gap_peripheral_connect ( uint8_t addr_type , const uint8_t * addr , int32_t duration_ms ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gap_peripheral_connect \n " ) ;
2020-02-20 03:44:13 +00:00
uint16_t conn_scan_interval = 60000 / 625 ;
uint16_t conn_scan_window = 30000 / 625 ;
uint16_t conn_interval_min = 10000 / 1250 ;
uint16_t conn_interval_max = 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 ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gattc_discover_primary_services ( uint16_t conn_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gattc_discover_primary_services \n " ) ;
2020-02-20 03:44:13 +00:00
return btstack_error_to_errno ( gatt_client_discover_primary_services ( & btstack_packet_handler , conn_handle ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gattc_discover_characteristics ( uint16_t conn_handle , uint16_t start_handle , uint16_t end_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gattc_discover_characteristics \n " ) ;
2020-02-20 03:44:13 +00:00
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 } ,
} ;
return btstack_error_to_errno ( gatt_client_discover_characteristics_for_service ( & btstack_packet_handler , conn_handle , & service ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gattc_discover_descriptors ( uint16_t conn_handle , uint16_t start_handle , uint16_t end_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gattc_discover_descriptors \n " ) ;
2020-02-20 03:44:13 +00:00
gatt_client_characteristic_t characteristic = {
// Only start/end handles needed for gatt_client_discover_characteristic_descriptors.
. start_handle = start_handle ,
. value_handle = 0 ,
. end_handle = end_handle ,
. properties = 0 ,
. uuid16 = 0 ,
. uuid128 = { 0 } ,
} ;
return btstack_error_to_errno ( gatt_client_discover_characteristic_descriptors ( & btstack_packet_handler , conn_handle , & characteristic ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gattc_read ( uint16_t conn_handle , uint16_t value_handle ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gattc_read \n " ) ;
2020-02-20 03:44:13 +00:00
return btstack_error_to_errno ( gatt_client_read_value_of_characteristic_using_value_handle ( & btstack_packet_handler , conn_handle , value_handle ) ) ;
2020-02-20 03:40:55 +00:00
}
int mp_bluetooth_gattc_write ( uint16_t conn_handle , uint16_t value_handle , const uint8_t * value , size_t * value_len , unsigned int mode ) {
2020-02-20 03:43:52 +00:00
DEBUG_EVENT_printf ( " mp_bluetooth_gattc_write \n " ) ;
2020-02-20 03:44:13 +00:00
// TODO the below gatt_client functions do not copy the data and require it to be valid
// until the write is done, so there should be some kind of buffering done here.
if ( mode = = MP_BLUETOOTH_WRITE_MODE_NO_RESPONSE ) {
// TODO need to call gatt_client_request_can_write_without_response_event then do
// the actual write on the callback from that.
return btstack_error_to_errno ( gatt_client_write_value_of_characteristic_without_response ( conn_handle , value_handle , * value_len , ( uint8_t * ) value ) ) ;
}
if ( mode = = MP_BLUETOOTH_WRITE_MODE_WITH_RESPONSE ) {
return btstack_error_to_errno ( gatt_client_write_value_of_characteristic ( & btstack_packet_handler_write_with_response , conn_handle , value_handle , * value_len , ( uint8_t * ) value ) ) ;
}
return MP_EINVAL ;
2020-02-20 03:40:55 +00:00
}
2020-03-06 01:37:37 +00:00
# endif // MICROPY_PY_BLUETOOTH_ENABLE_CENTRAL_MODE
2020-02-20 03:40:55 +00:00
# endif // MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_BTSTACK