|
|
@ -5,16 +5,19 @@ import time, machine, bluetooth |
|
|
|
|
|
|
|
TIMEOUT_MS = 5000 |
|
|
|
|
|
|
|
_IRQ_CENTRAL_CONNECT = const(1 << 0) |
|
|
|
_IRQ_CENTRAL_DISCONNECT = const(1 << 1) |
|
|
|
_IRQ_GATTS_WRITE = const(1 << 2) |
|
|
|
_IRQ_PERIPHERAL_CONNECT = const(1 << 6) |
|
|
|
_IRQ_PERIPHERAL_DISCONNECT = const(1 << 7) |
|
|
|
_IRQ_GATTC_SERVICE_RESULT = const(1 << 8) |
|
|
|
_IRQ_GATTC_CHARACTERISTIC_RESULT = const(1 << 9) |
|
|
|
_IRQ_GATTC_READ_RESULT = const(1 << 11) |
|
|
|
_IRQ_GATTC_WRITE_STATUS = const(1 << 12) |
|
|
|
_IRQ_GATTC_NOTIFY = const(1 << 13) |
|
|
|
_IRQ_CENTRAL_CONNECT = const(1) |
|
|
|
_IRQ_CENTRAL_DISCONNECT = const(2) |
|
|
|
_IRQ_GATTS_WRITE = const(3) |
|
|
|
_IRQ_PERIPHERAL_CONNECT = const(7) |
|
|
|
_IRQ_PERIPHERAL_DISCONNECT = const(8) |
|
|
|
_IRQ_GATTC_SERVICE_RESULT = const(9) |
|
|
|
_IRQ_GATTC_SERVICE_DONE = const(10) |
|
|
|
_IRQ_GATTC_CHARACTERISTIC_RESULT = const(11) |
|
|
|
_IRQ_GATTC_CHARACTERISTIC_DONE = const(12) |
|
|
|
_IRQ_GATTC_READ_RESULT = const(15) |
|
|
|
_IRQ_GATTC_READ_DONE = const(16) |
|
|
|
_IRQ_GATTC_WRITE_DONE = const(17) |
|
|
|
_IRQ_GATTC_NOTIFY = const(18) |
|
|
|
|
|
|
|
SERVICE_UUID = bluetooth.UUID("00000001-1111-2222-3333-444444444444") |
|
|
|
CHAR_CTRL_UUID = bluetooth.UUID("00000002-1111-2222-3333-444444444444") |
|
|
@ -26,17 +29,15 @@ CHAR_TX = (CHAR_TX_UUID, bluetooth.FLAG_NOTIFY) |
|
|
|
SERVICE = (SERVICE_UUID, (CHAR_CTRL, CHAR_RX, CHAR_TX)) |
|
|
|
SERVICES = (SERVICE,) |
|
|
|
|
|
|
|
last_event = None |
|
|
|
last_data = None |
|
|
|
waiting_event = None |
|
|
|
waiting_data = None |
|
|
|
ctrl_value_handle = 0 |
|
|
|
rx_value_handle = 0 |
|
|
|
tx_value_handle = 0 |
|
|
|
|
|
|
|
|
|
|
|
def irq(event, data): |
|
|
|
global last_event, last_data, ctrl_value_handle, rx_value_handle, tx_value_handle |
|
|
|
last_event = event |
|
|
|
last_data = data |
|
|
|
global waiting_event, waiting_data, ctrl_value_handle, rx_value_handle, tx_value_handle |
|
|
|
if event == _IRQ_CENTRAL_CONNECT: |
|
|
|
print("_IRQ_CENTRAL_CONNECT") |
|
|
|
elif event == _IRQ_CENTRAL_DISCONNECT: |
|
|
@ -49,31 +50,44 @@ def irq(event, data): |
|
|
|
print("_IRQ_PERIPHERAL_DISCONNECT") |
|
|
|
elif event == _IRQ_GATTC_CHARACTERISTIC_RESULT: |
|
|
|
if data[-1] == CHAR_CTRL_UUID: |
|
|
|
print("_IRQ_GATTC_SERVICE_RESULT", data[-1]) |
|
|
|
print("_IRQ_GATTC_CHARACTERISTIC_RESULT", data[-1]) |
|
|
|
ctrl_value_handle = data[2] |
|
|
|
elif data[-1] == CHAR_RX_UUID: |
|
|
|
print("_IRQ_GATTC_SERVICE_RESULT", data[-1]) |
|
|
|
print("_IRQ_GATTC_CHARACTERISTIC_RESULT", data[-1]) |
|
|
|
rx_value_handle = data[2] |
|
|
|
elif data[-1] == CHAR_TX_UUID: |
|
|
|
print("_IRQ_GATTC_SERVICE_RESULT", data[-1]) |
|
|
|
print("_IRQ_GATTC_CHARACTERISTIC_RESULT", data[-1]) |
|
|
|
tx_value_handle = data[2] |
|
|
|
elif event == _IRQ_GATTC_CHARACTERISTIC_DONE: |
|
|
|
print("_IRQ_GATTC_CHARACTERISTIC_DONE") |
|
|
|
elif event == _IRQ_GATTC_READ_RESULT: |
|
|
|
print("_IRQ_GATTC_READ_RESULT", data[-1]) |
|
|
|
elif event == _IRQ_GATTC_WRITE_STATUS: |
|
|
|
print("_IRQ_GATTC_WRITE_STATUS", data[-1]) |
|
|
|
elif event == _IRQ_GATTC_READ_DONE: |
|
|
|
print("_IRQ_GATTC_READ_DONE", data[-1]) |
|
|
|
elif event == _IRQ_GATTC_WRITE_DONE: |
|
|
|
print("_IRQ_GATTC_WRITE_DONE", data[-1]) |
|
|
|
elif event == _IRQ_GATTC_NOTIFY: |
|
|
|
print("_IRQ_GATTC_NOTIFY", data[-1]) |
|
|
|
|
|
|
|
if waiting_event is not None: |
|
|
|
if (isinstance(waiting_event, int) and event == waiting_event) or ( |
|
|
|
not isinstance(waiting_event, int) and waiting_event(event, data) |
|
|
|
): |
|
|
|
waiting_event = None |
|
|
|
waiting_data = data |
|
|
|
|
|
|
|
|
|
|
|
def wait_for_event(event, timeout_ms): |
|
|
|
global waiting_event, waiting_data |
|
|
|
waiting_event = event |
|
|
|
waiting_data = None |
|
|
|
|
|
|
|
t0 = time.ticks_ms() |
|
|
|
while time.ticks_diff(time.ticks_ms(), t0) < timeout_ms: |
|
|
|
if isinstance(event, int): |
|
|
|
if last_event == event: |
|
|
|
break |
|
|
|
elif event(): |
|
|
|
break |
|
|
|
if waiting_data: |
|
|
|
return True |
|
|
|
machine.idle() |
|
|
|
return False |
|
|
|
|
|
|
|
|
|
|
|
# Acting in peripheral role. |
|
|
@ -89,14 +103,13 @@ def instance0(): |
|
|
|
multitest.next() |
|
|
|
try: |
|
|
|
# Wait for central to connect to us. |
|
|
|
wait_for_event(_IRQ_CENTRAL_CONNECT, TIMEOUT_MS) |
|
|
|
if last_event != _IRQ_CENTRAL_CONNECT: |
|
|
|
if not wait_for_event(_IRQ_CENTRAL_CONNECT, TIMEOUT_MS): |
|
|
|
return |
|
|
|
conn_handle, _, _ = last_data |
|
|
|
conn_handle, _, _ = waiting_data |
|
|
|
|
|
|
|
# Wait for the central to signal that it's done with its part of the test. |
|
|
|
wait_for_event( |
|
|
|
lambda: last_event == _IRQ_GATTS_WRITE and last_data[1] == char_ctrl_handle, |
|
|
|
lambda event, data: event == _IRQ_GATTS_WRITE and data[1] == char_ctrl_handle, |
|
|
|
2 * TIMEOUT_MS, |
|
|
|
) |
|
|
|
|
|
|
@ -125,32 +138,33 @@ def instance1(): |
|
|
|
# Connect to peripheral and then disconnect. |
|
|
|
print("gap_connect") |
|
|
|
ble.gap_connect(0, BDADDR) |
|
|
|
wait_for_event(_IRQ_PERIPHERAL_CONNECT, TIMEOUT_MS) |
|
|
|
if last_event != _IRQ_PERIPHERAL_CONNECT: |
|
|
|
if not wait_for_event(_IRQ_PERIPHERAL_CONNECT, TIMEOUT_MS): |
|
|
|
return |
|
|
|
conn_handle, _, _ = last_data |
|
|
|
conn_handle, _, _ = waiting_data |
|
|
|
|
|
|
|
# Discover characteristics. |
|
|
|
ble.gattc_discover_characteristics(conn_handle, 1, 65535) |
|
|
|
wait_for_event( |
|
|
|
lambda: ctrl_value_handle and rx_value_handle and tx_value_handle, TIMEOUT_MS |
|
|
|
lambda event, data: ctrl_value_handle and rx_value_handle and tx_value_handle, |
|
|
|
TIMEOUT_MS, |
|
|
|
) |
|
|
|
wait_for_event(_IRQ_GATTC_CHARACTERISTIC_DONE, TIMEOUT_MS) |
|
|
|
|
|
|
|
# Write to the characteristic a few times, with and without response. |
|
|
|
for i in range(4): |
|
|
|
print("gattc_write") |
|
|
|
ble.gattc_write(conn_handle, rx_value_handle, "central{}".format(i), i & 1) |
|
|
|
if i & 1: |
|
|
|
wait_for_event(_IRQ_GATTC_WRITE_STATUS, TIMEOUT_MS) |
|
|
|
wait_for_event(_IRQ_GATTC_WRITE_DONE, TIMEOUT_MS) |
|
|
|
time.sleep_ms(400) |
|
|
|
|
|
|
|
# Write to say that we are done with our part of the test. |
|
|
|
ble.gattc_write(conn_handle, ctrl_value_handle, "OK", 1) |
|
|
|
wait_for_event(_IRQ_GATTC_WRITE_STATUS, TIMEOUT_MS) |
|
|
|
wait_for_event(_IRQ_GATTC_WRITE_DONE, TIMEOUT_MS) |
|
|
|
|
|
|
|
# Wait for notification that peripheral is done with its part of the test. |
|
|
|
wait_for_event( |
|
|
|
lambda: last_event == _IRQ_GATTC_NOTIFY and last_data[1] == ctrl_value_handle, |
|
|
|
lambda event, data: event == _IRQ_GATTC_NOTIFY and data[1] == ctrl_value_handle, |
|
|
|
TIMEOUT_MS, |
|
|
|
) |
|
|
|
|
|
|
|