You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
123 lines
4.0 KiB
123 lines
4.0 KiB
# Test BLE GAP device name get/set
|
|
|
|
from micropython import const
|
|
import time, machine, bluetooth
|
|
|
|
TIMEOUT_MS = 5000
|
|
|
|
_IRQ_CENTRAL_CONNECT = const(1)
|
|
_IRQ_CENTRAL_DISCONNECT = const(2)
|
|
_IRQ_PERIPHERAL_CONNECT = const(7)
|
|
_IRQ_PERIPHERAL_DISCONNECT = const(8)
|
|
_IRQ_GATTC_CHARACTERISTIC_RESULT = const(11)
|
|
_IRQ_GATTC_CHARACTERISTIC_DONE = const(12)
|
|
_IRQ_GATTC_READ_RESULT = const(15)
|
|
_IRQ_GATTC_READ_DONE = const(16)
|
|
|
|
GAP_DEVICE_NAME_UUID = bluetooth.UUID(0x2A00)
|
|
|
|
waiting_events = {}
|
|
|
|
|
|
def irq(event, data):
|
|
if event == _IRQ_CENTRAL_CONNECT:
|
|
print("_IRQ_CENTRAL_CONNECT")
|
|
waiting_events[event] = data[0]
|
|
elif event == _IRQ_CENTRAL_DISCONNECT:
|
|
print("_IRQ_CENTRAL_DISCONNECT")
|
|
elif event == _IRQ_PERIPHERAL_CONNECT:
|
|
print("_IRQ_PERIPHERAL_CONNECT")
|
|
waiting_events[event] = data[0]
|
|
elif event == _IRQ_PERIPHERAL_DISCONNECT:
|
|
print("_IRQ_PERIPHERAL_DISCONNECT")
|
|
elif event == _IRQ_GATTC_CHARACTERISTIC_RESULT:
|
|
if data[-1] == GAP_DEVICE_NAME_UUID:
|
|
print("_IRQ_GATTC_CHARACTERISTIC_RESULT", data[-1])
|
|
waiting_events[event] = data[2]
|
|
else:
|
|
return
|
|
elif event == _IRQ_GATTC_CHARACTERISTIC_DONE:
|
|
print("_IRQ_GATTC_CHARACTERISTIC_DONE")
|
|
elif event == _IRQ_GATTC_READ_RESULT:
|
|
print("_IRQ_GATTC_READ_RESULT", bytes(data[-1]))
|
|
|
|
if event not in waiting_events:
|
|
waiting_events[event] = None
|
|
|
|
|
|
def wait_for_event(event, timeout_ms):
|
|
t0 = time.ticks_ms()
|
|
while time.ticks_diff(time.ticks_ms(), t0) < timeout_ms:
|
|
if event in waiting_events:
|
|
return waiting_events.pop(event)
|
|
machine.idle()
|
|
raise ValueError("Timeout waiting for {}".format(event))
|
|
|
|
|
|
# Acting in peripheral role.
|
|
def instance0():
|
|
multitest.globals(BDADDR=ble.config("mac"))
|
|
|
|
# Test setting and getting the GAP device name before registering services.
|
|
ble.config(gap_name="GAP_NAME")
|
|
print(ble.config("gap_name"))
|
|
|
|
# Create an empty service and start advertising.
|
|
ble.gatts_register_services([])
|
|
print("gap_advertise")
|
|
multitest.next()
|
|
|
|
try:
|
|
# Do multiple iterations to test changing the name.
|
|
for iteration in range(2):
|
|
# Set the GAP device name and start advertising.
|
|
ble.config(gap_name="GAP_NAME{}".format(iteration))
|
|
print(ble.config("gap_name"))
|
|
ble.gap_advertise(20_000)
|
|
|
|
multitest.broadcast("peripheral:adv:{}".format(iteration))
|
|
|
|
# Wait for central to connect, then wait for it to disconnect.
|
|
wait_for_event(_IRQ_CENTRAL_CONNECT, TIMEOUT_MS)
|
|
wait_for_event(_IRQ_CENTRAL_DISCONNECT, 4 * TIMEOUT_MS)
|
|
finally:
|
|
ble.active(0)
|
|
|
|
|
|
# Acting in central role.
|
|
def instance1():
|
|
multitest.next()
|
|
try:
|
|
value_handle = None
|
|
for iteration in range(2):
|
|
# Wait for peripheral to start advertising.
|
|
multitest.wait("peripheral:adv:{}".format(iteration))
|
|
|
|
# Connect to peripheral.
|
|
print("gap_connect")
|
|
ble.gap_connect(*BDADDR)
|
|
conn_handle = wait_for_event(_IRQ_PERIPHERAL_CONNECT, TIMEOUT_MS)
|
|
|
|
if iteration == 0:
|
|
# Only do characteristic discovery on the first iteration,
|
|
# assume value_handle is unchanged on the second.
|
|
print("gattc_discover_characteristics")
|
|
ble.gattc_discover_characteristics(conn_handle, 1, 65535)
|
|
value_handle = wait_for_event(_IRQ_GATTC_CHARACTERISTIC_RESULT, TIMEOUT_MS)
|
|
wait_for_event(_IRQ_GATTC_CHARACTERISTIC_DONE, TIMEOUT_MS)
|
|
|
|
# Read the peripheral's GAP device name.
|
|
print("gattc_read")
|
|
ble.gattc_read(conn_handle, value_handle)
|
|
wait_for_event(_IRQ_GATTC_READ_RESULT, TIMEOUT_MS)
|
|
|
|
# Disconnect from peripheral.
|
|
print("gap_disconnect:", ble.gap_disconnect(conn_handle))
|
|
wait_for_event(_IRQ_PERIPHERAL_DISCONNECT, TIMEOUT_MS)
|
|
finally:
|
|
ble.active(0)
|
|
|
|
|
|
ble = bluetooth.BLE()
|
|
ble.active(1)
|
|
ble.irq(irq)
|
|
|