mirror of
https://github.com/espruino/Espruino.git
synced 2025-12-08 19:06:15 +00:00
647 lines
23 KiB
C
647 lines
23 KiB
C
/* Copyright (c) 2014 Nordic Semiconductor. All Rights Reserved.
|
|
*
|
|
* The information contained herein is property of Nordic Semiconductor ASA.
|
|
* Terms and conditions of usage are described in detail in NORDIC
|
|
* SEMICONDUCTOR STANDARD SOFTWARE LICENSE AGREEMENT.
|
|
*
|
|
* Licensees are granted free, non-transferable use of the information. NO
|
|
* WARRANTY of ANY KIND is provided. This heading must NOT be removed from
|
|
* the file.
|
|
*
|
|
*/
|
|
|
|
/* DO_NOT_INCLUDE_IN_DOCS - this is a special token for common.py,
|
|
so we don't put this into espruino.com/Reference until this is out
|
|
of beta. */
|
|
|
|
/** @file
|
|
*
|
|
* @defgroup ble_sdk_uart_over_ble_main main.c
|
|
* @{
|
|
* @ingroup ble_sdk_app_nus_eval
|
|
* @brief UART over BLE application main file.
|
|
*
|
|
* This file contains the source code for a sample application that uses the Nordic UART service.
|
|
* This application uses the @ref srvlib_conn_params module.
|
|
*/
|
|
|
|
#include "jswrap_bluetooth.h"
|
|
#include "jsinteractive.h"
|
|
#include "jsdevices.h"
|
|
|
|
#include <stdint.h>
|
|
#include <string.h>
|
|
#include <stdbool.h>
|
|
#include "nordic_common.h"
|
|
#include "nrf.h"
|
|
#include "ble_hci.h"
|
|
#include "ble_advdata.h"
|
|
#include "ble_advertising.h"
|
|
#include "ble_conn_params.h"
|
|
#include "softdevice_handler.h"
|
|
#include "app_timer.h"
|
|
#include "ble_nus.h"
|
|
#include "app_util_platform.h"
|
|
|
|
#define IS_SRVC_CHANGED_CHARACT_PRESENT 0 /**< Include the service_changed characteristic. If not enabled, the server's database cannot be changed for the lifetime of the device. */
|
|
|
|
#define CENTRAL_LINK_COUNT 0 /**<number of central links used by the application. When changing this number remember to adjust the RAM settings*/
|
|
#define PERIPHERAL_LINK_COUNT 1 /**<number of peripheral links used by the application. When changing this number remember to adjust the RAM settings*/
|
|
// Working out the amount of RAM we need - see softdevice_handler.h
|
|
#define IDEAL_RAM_START_ADDRESS_INTERN(CENTRAL_LINK_COUNT, PERIPHERAL_LINK_COUNT) \
|
|
APP_RAM_BASE_CENTRAL_LINKS_##CENTRAL_LINK_COUNT##_PERIPH_LINKS_##PERIPHERAL_LINK_COUNT##_SEC_COUNT_0_MID_BW
|
|
#define IDEAL_RAM_START_ADDRESS(C_LINK_CNT, P_LINK_CNT) IDEAL_RAM_START_ADDRESS_INTERN(C_LINK_CNT, P_LINK_CNT)
|
|
|
|
#define DEVICE_NAME "Espruino "PC_BOARD_ID /**< Name of device. Will be included in the advertising data. */
|
|
#define NUS_SERVICE_UUID_TYPE BLE_UUID_TYPE_VENDOR_BEGIN /**< UUID type for the Nordic UART Service (vendor specific). */
|
|
|
|
#define APP_ADV_INTERVAL 1200 /**< The advertising interval (in units of 0.625 ms. This value corresponds to 750ms). */
|
|
#define APP_ADV_TIMEOUT_IN_SECONDS 180 /**< The advertising timeout (in units of seconds). */
|
|
|
|
#define SCAN_INTERVAL 0x00A0 /**< Scan interval in units of 0.625 millisecond. 100ms */
|
|
#define SCAN_WINDOW 0x00A0 /**< Scan window in units of 0.625 millisecond. 100ms */
|
|
// We want to listen as much of the time as possible. Not sure if 100/100 is feasible (50/100 is what's used in examples),
|
|
// but it seems to work fine like this.
|
|
|
|
#define APP_TIMER_PRESCALER 0 /**< Value of the RTC1 PRESCALER register. */
|
|
#define APP_TIMER_OP_QUEUE_SIZE 1 /**< Size of timer operation queues. */
|
|
|
|
#define MIN_CONN_INTERVAL MSEC_TO_UNITS(20, UNIT_1_25_MS) /**< Minimum acceptable connection interval (20 ms), Connection interval uses 1.25 ms units. */
|
|
#define MAX_CONN_INTERVAL MSEC_TO_UNITS(75, UNIT_1_25_MS) /**< Maximum acceptable connection interval (75 ms), Connection interval uses 1.25 ms units. */
|
|
#define SLAVE_LATENCY 0 /**< Slave latency. */
|
|
#define CONN_SUP_TIMEOUT MSEC_TO_UNITS(4000, UNIT_10_MS) /**< Connection supervisory timeout (4 seconds), Supervision Timeout uses 10 ms units. */
|
|
#define FIRST_CONN_PARAMS_UPDATE_DELAY APP_TIMER_TICKS(5000, APP_TIMER_PRESCALER) /**< Time from initiating event (connect or start of notification) to first time sd_ble_gap_conn_param_update is called (5 seconds). */
|
|
#define NEXT_CONN_PARAMS_UPDATE_DELAY APP_TIMER_TICKS(30000, APP_TIMER_PRESCALER) /**< Time between each call to sd_ble_gap_conn_param_update after the first call (30 seconds). */
|
|
#define MAX_CONN_PARAMS_UPDATE_COUNT 3 /**< Number of attempts before giving up the connection parameter negotiation. */
|
|
|
|
#define DEAD_BEEF 0xDEADBEEF /**< Value used as error code on stack dump, can be used to identify stack location on stack unwind. */
|
|
|
|
static ble_nus_t m_nus; /**< Structure to identify the Nordic UART Service. */
|
|
static uint16_t m_conn_handle = BLE_CONN_HANDLE_INVALID; /**< Handle of the current connection. */
|
|
|
|
static ble_uuid_t m_adv_uuids[] = {{BLE_UUID_NUS_SERVICE, NUS_SERVICE_UUID_TYPE}}; /**< Universally unique service identifier. */
|
|
static bool ble_is_sending;
|
|
|
|
#define BLE_SCAN_EVENT JS_EVENT_PREFIX"blescan"
|
|
|
|
/**@brief Error handlers.
|
|
*
|
|
* @details
|
|
*/
|
|
void ble_app_error_handler(uint32_t error_code, uint32_t line_num, const uint8_t * p_file_name) {
|
|
jsiConsolePrintf("NRF ERROR 0x%x at %s:%d\n", error_code, p_file_name, line_num);
|
|
jsiConsolePrint("REBOOTING.\n");
|
|
jshTransmitFlush();
|
|
NVIC_SystemReset();
|
|
}
|
|
|
|
/**@brief Function for assert macro callback.
|
|
*
|
|
* @details This function will be called in case of an assert in the SoftDevice.
|
|
*
|
|
* @warning This handler is an example only and does not fit a final product. You need to analyse
|
|
* how your product is supposed to react in case of Assert.
|
|
* @warning On assert from the SoftDevice, the system can only recover on reset.
|
|
*
|
|
* @param[in] line_num Line number of the failing ASSERT call.
|
|
* @param[in] p_file_name File name of the failing ASSERT call.
|
|
*/
|
|
void assert_nrf_callback(uint16_t line_num, const uint8_t * p_file_name)
|
|
{
|
|
ble_app_error_handler(DEAD_BEEF, line_num, p_file_name);
|
|
}
|
|
|
|
|
|
/**@brief Function for the GAP initialization.
|
|
*
|
|
* @details This function will set up all the necessary GAP (Generic Access Profile) parameters of
|
|
* the device. It also sets the permissions and appearance.
|
|
*/
|
|
static void gap_params_init(void)
|
|
{
|
|
uint32_t err_code;
|
|
ble_gap_conn_params_t gap_conn_params;
|
|
ble_gap_conn_sec_mode_t sec_mode;
|
|
|
|
BLE_GAP_CONN_SEC_MODE_SET_OPEN(&sec_mode);
|
|
|
|
err_code = sd_ble_gap_device_name_set(&sec_mode,
|
|
(const uint8_t *) DEVICE_NAME,
|
|
strlen(DEVICE_NAME));
|
|
APP_ERROR_CHECK(err_code);
|
|
|
|
memset(&gap_conn_params, 0, sizeof(gap_conn_params));
|
|
|
|
gap_conn_params.min_conn_interval = MIN_CONN_INTERVAL;
|
|
gap_conn_params.max_conn_interval = MAX_CONN_INTERVAL;
|
|
gap_conn_params.slave_latency = SLAVE_LATENCY;
|
|
gap_conn_params.conn_sup_timeout = CONN_SUP_TIMEOUT;
|
|
|
|
err_code = sd_ble_gap_ppcp_set(&gap_conn_params);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
|
|
/**@brief Function for handling the data from the Nordic UART Service.
|
|
*
|
|
* @details This function will process the data received from the Nordic UART BLE Service and send
|
|
* it to the terminal.
|
|
*
|
|
* @param[in] p_nus Nordic UART Service structure.
|
|
* @param[in] p_data Data to be send to UART module.
|
|
* @param[in] length Length of the data.
|
|
*/
|
|
/**@snippet [Handling the data received over BLE] */
|
|
static void nus_data_handler(ble_nus_t * p_nus, uint8_t * p_data, uint16_t length)
|
|
{
|
|
uint32_t i;
|
|
for (i = 0; i < length; i++) {
|
|
jshPushIOCharEvent(EV_BLUETOOTH, (char) p_data[i]);
|
|
}
|
|
}
|
|
|
|
bool jswrap_nrf_transmit_string() {
|
|
if (m_conn_handle == BLE_CONN_HANDLE_INVALID) {
|
|
// If no connection, drain the output buffer
|
|
while (jshGetCharToTransmit(EV_BLUETOOTH)>=0);
|
|
}
|
|
if (ble_is_sending) return false;
|
|
static uint8_t buf[BLE_NUS_MAX_DATA_LEN];
|
|
int idx = 0;
|
|
int ch = jshGetCharToTransmit(EV_BLUETOOTH);
|
|
while (ch>=0) {
|
|
buf[idx++] = ch;
|
|
if (idx>=BLE_NUS_MAX_DATA_LEN) break;
|
|
ch = jshGetCharToTransmit(EV_BLUETOOTH);
|
|
}
|
|
if (idx>0) {
|
|
if (ble_nus_string_send(&m_nus, buf, idx) == NRF_SUCCESS)
|
|
ble_is_sending = true;
|
|
}
|
|
return idx>0;
|
|
}
|
|
/**@snippet [Handling the data received over BLE] */
|
|
|
|
|
|
/**@brief Function for initializing services that will be used by the application.
|
|
*/
|
|
static void services_init(void)
|
|
{
|
|
uint32_t err_code;
|
|
ble_nus_init_t nus_init;
|
|
|
|
memset(&nus_init, 0, sizeof(nus_init));
|
|
|
|
nus_init.data_handler = nus_data_handler;
|
|
|
|
err_code = ble_nus_init(&m_nus, &nus_init);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
|
|
/**@brief Function for handling an event from the Connection Parameters Module.
|
|
*
|
|
* @details This function will be called for all events in the Connection Parameters Module
|
|
* which are passed to the application.
|
|
*
|
|
* @note All this function does is to disconnect. This could have been done by simply setting
|
|
* the disconnect_on_fail config parameter, but instead we use the event handler
|
|
* mechanism to demonstrate its use.
|
|
*
|
|
* @param[in] p_evt Event received from the Connection Parameters Module.
|
|
*/
|
|
static void on_conn_params_evt(ble_conn_params_evt_t * p_evt)
|
|
{
|
|
uint32_t err_code;
|
|
|
|
if(p_evt->evt_type == BLE_CONN_PARAMS_EVT_FAILED)
|
|
{
|
|
err_code = sd_ble_gap_disconnect(m_conn_handle, BLE_HCI_CONN_INTERVAL_UNACCEPTABLE);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
}
|
|
|
|
|
|
/**@brief Function for handling errors from the Connection Parameters module.
|
|
*
|
|
* @param[in] nrf_error Error code containing information about what went wrong.
|
|
*/
|
|
static void conn_params_error_handler(uint32_t nrf_error)
|
|
{
|
|
APP_ERROR_HANDLER(nrf_error);
|
|
}
|
|
|
|
|
|
/**@brief Function for initializing the Connection Parameters module.
|
|
*/
|
|
static void conn_params_init(void)
|
|
{
|
|
uint32_t err_code;
|
|
ble_conn_params_init_t cp_init;
|
|
|
|
memset(&cp_init, 0, sizeof(cp_init));
|
|
|
|
cp_init.p_conn_params = NULL;
|
|
cp_init.first_conn_params_update_delay = FIRST_CONN_PARAMS_UPDATE_DELAY;
|
|
cp_init.next_conn_params_update_delay = NEXT_CONN_PARAMS_UPDATE_DELAY;
|
|
cp_init.max_conn_params_update_count = MAX_CONN_PARAMS_UPDATE_COUNT;
|
|
cp_init.start_on_notify_cccd_handle = BLE_GATT_HANDLE_INVALID;
|
|
cp_init.disconnect_on_fail = false;
|
|
cp_init.evt_handler = on_conn_params_evt;
|
|
cp_init.error_handler = conn_params_error_handler;
|
|
|
|
err_code = ble_conn_params_init(&cp_init);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
void jswrap_nrf_bluetooth_startAdvertise(void) {
|
|
uint32_t err_code = 0;
|
|
// Actually start advertising
|
|
ble_gap_adv_params_t adv_params;
|
|
memset(&adv_params, 0, sizeof(adv_params));
|
|
adv_params.type = BLE_GAP_ADV_TYPE_ADV_IND;
|
|
adv_params.p_peer_addr = NULL;
|
|
adv_params.fp = BLE_GAP_ADV_FP_ANY;
|
|
adv_params.p_whitelist = NULL;
|
|
adv_params.timeout = APP_ADV_TIMEOUT_IN_SECONDS;
|
|
adv_params.interval = APP_ADV_INTERVAL;
|
|
|
|
err_code = sd_ble_gap_adv_start(&adv_params);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
/**@brief Function for the application's SoftDevice event handler.
|
|
*
|
|
* @param[in] p_ble_evt SoftDevice event.
|
|
*/
|
|
static void on_ble_evt(ble_evt_t * p_ble_evt)
|
|
{
|
|
uint32_t err_code;
|
|
|
|
switch (p_ble_evt->header.evt_id) {
|
|
case BLE_GAP_EVT_TIMEOUT:
|
|
// the timeout for sd_ble_gap_adv_start expired - kick it off again
|
|
jswrap_nrf_bluetooth_startAdvertise();
|
|
break;
|
|
|
|
case BLE_GAP_EVT_CONNECTED:
|
|
m_conn_handle = p_ble_evt->evt.gap_evt.conn_handle;
|
|
ble_is_sending = false; // reset state - just in case
|
|
jsiSetConsoleDevice( EV_BLUETOOTH );
|
|
break;
|
|
|
|
case BLE_GAP_EVT_DISCONNECTED:
|
|
m_conn_handle = BLE_CONN_HANDLE_INVALID;
|
|
jsiSetConsoleDevice( DEFAULT_CONSOLE_DEVICE );
|
|
// restart advertising after disconnection
|
|
jswrap_nrf_bluetooth_startAdvertise();
|
|
break;
|
|
|
|
case BLE_GAP_EVT_SEC_PARAMS_REQUEST:
|
|
// Pairing not supported
|
|
err_code = sd_ble_gap_sec_params_reply(m_conn_handle, BLE_GAP_SEC_STATUS_PAIRING_NOT_SUPP, NULL, NULL);
|
|
APP_ERROR_CHECK(err_code);
|
|
break;
|
|
|
|
case BLE_GATTS_EVT_SYS_ATTR_MISSING:
|
|
// No system attributes have been stored.
|
|
err_code = sd_ble_gatts_sys_attr_set(m_conn_handle, NULL, 0, 0);
|
|
APP_ERROR_CHECK(err_code);
|
|
break;
|
|
|
|
case BLE_EVT_TX_COMPLETE:
|
|
// UART Transmit finished - we can try and send more data
|
|
ble_is_sending = false;
|
|
jswrap_nrf_transmit_string();
|
|
break;
|
|
|
|
case BLE_GAP_EVT_ADV_REPORT: {
|
|
// Advertising data received
|
|
const ble_gap_evt_adv_report_t *p_adv = &p_ble_evt->evt.gap_evt.params.adv_report;
|
|
|
|
JsVar *evt = jsvNewObject();
|
|
if (evt) {
|
|
jsvObjectSetChildAndUnLock(evt, "rssi", jsvNewFromInteger(p_adv->rssi));
|
|
jsvObjectSetChildAndUnLock(evt, "addr", jsvVarPrintf("%02x:%02x:%02x:%02x:%02x:%02x",
|
|
p_adv->peer_addr.addr[0],
|
|
p_adv->peer_addr.addr[1],
|
|
p_adv->peer_addr.addr[2],
|
|
p_adv->peer_addr.addr[3],
|
|
p_adv->peer_addr.addr[4],
|
|
p_adv->peer_addr.addr[5]));
|
|
JsVar *data = jsvNewStringOfLength(p_adv->dlen);
|
|
if (data) {
|
|
jsvSetString(data, p_adv->data, p_adv->dlen);
|
|
JsVar *ab = jsvNewArrayBufferFromString(data, p_adv->dlen);
|
|
jsvUnLock(data);
|
|
jsvObjectSetChildAndUnLock(evt, "data", ab);
|
|
}
|
|
jsiQueueObjectCallbacks(execInfo.root, BLE_SCAN_EVENT, &evt, 1);
|
|
jsvUnLock(evt);
|
|
}
|
|
break;
|
|
}
|
|
|
|
default:
|
|
// No implementation needed.
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/**@brief Function for dispatching a SoftDevice event to all modules with a SoftDevice
|
|
* event handler.
|
|
*
|
|
* @details This function is called from the SoftDevice event interrupt handler after a
|
|
* SoftDevice event has been received.
|
|
*
|
|
* @param[in] p_ble_evt SoftDevice event.
|
|
*/
|
|
static void ble_evt_dispatch(ble_evt_t * p_ble_evt)
|
|
{
|
|
ble_conn_params_on_ble_evt(p_ble_evt);
|
|
ble_nus_on_ble_evt(&m_nus, p_ble_evt);
|
|
on_ble_evt(p_ble_evt);
|
|
}
|
|
|
|
|
|
/**@brief Function for the SoftDevice initialization.
|
|
*
|
|
* @details This function initializes the SoftDevice and the BLE event interrupt.
|
|
*/
|
|
static void ble_stack_init(void)
|
|
{
|
|
uint32_t err_code;
|
|
|
|
// Initialize SoftDevice.
|
|
// SOFTDEVICE_HANDLER_INIT(NRF_CLOCK_LFCLKSRC_XTAL_20_PPM, NULL);
|
|
SOFTDEVICE_HANDLER_INIT(NRF_CLOCK_LFCLKSRC_RC_250_PPM_TEMP_8000MS_CALIBRATION, false);
|
|
|
|
ble_enable_params_t ble_enable_params;
|
|
err_code = softdevice_enable_get_default_config(CENTRAL_LINK_COUNT,
|
|
PERIPHERAL_LINK_COUNT,
|
|
&ble_enable_params);
|
|
APP_ERROR_CHECK(err_code);
|
|
|
|
//Check the ram settings against the used number of links
|
|
CHECK_RAM_START_ADDR(CENTRAL_LINK_COUNT, PERIPHERAL_LINK_COUNT);
|
|
|
|
extern void __data_start__;
|
|
if (IDEAL_RAM_START_ADDRESS(CENTRAL_LINK_COUNT, PERIPHERAL_LINK_COUNT) != (uint32_t)&__data_start__) {
|
|
jsiConsolePrintf("WARNING: BLE RAM start address not correct - is 0x%x, should be 0x%x", (uint32_t)&__data_start__, IDEAL_RAM_START_ADDRESS(CENTRAL_LINK_COUNT, PERIPHERAL_LINK_COUNT));
|
|
jshTransmitFlush();
|
|
}
|
|
|
|
// Enable BLE stack.
|
|
err_code = softdevice_enable(&ble_enable_params);
|
|
APP_ERROR_CHECK(err_code);
|
|
|
|
// Subscribe for BLE events.
|
|
err_code = softdevice_ble_evt_handler_set(ble_evt_dispatch);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
// Build advertising data struct to pass into @ref ble_advertising_init.
|
|
static void setup_advdata(ble_advdata_t *advdata) {
|
|
memset(advdata, 0, sizeof(*advdata));
|
|
advdata->name_type = BLE_ADVDATA_FULL_NAME;
|
|
advdata->include_appearance = false;
|
|
advdata->flags = BLE_GAP_ADV_FLAGS_LE_ONLY_LIMITED_DISC_MODE;
|
|
}
|
|
|
|
|
|
/**@brief Function for initializing the Advertising functionality.
|
|
*/
|
|
static void advertising_init(void)
|
|
{
|
|
uint32_t err_code;
|
|
ble_advdata_t advdata;
|
|
ble_advdata_t scanrsp;
|
|
|
|
// Build advertising data struct to pass into @ref ble_advertising_init.
|
|
setup_advdata(&advdata);
|
|
|
|
memset(&scanrsp, 0, sizeof(scanrsp));
|
|
scanrsp.uuids_complete.uuid_cnt = sizeof(m_adv_uuids) / sizeof(m_adv_uuids[0]);
|
|
scanrsp.uuids_complete.p_uuids = m_adv_uuids;
|
|
|
|
ble_adv_modes_config_t options = {0};
|
|
options.ble_adv_fast_enabled = BLE_ADV_FAST_ENABLED;
|
|
options.ble_adv_fast_interval = APP_ADV_INTERVAL;
|
|
options.ble_adv_fast_timeout = APP_ADV_TIMEOUT_IN_SECONDS;
|
|
|
|
err_code = ble_advertising_init(&advdata, &scanrsp, &options, NULL, NULL);
|
|
APP_ERROR_CHECK(err_code);
|
|
}
|
|
|
|
/*JSON{
|
|
"type": "class",
|
|
"class" : "NRF"
|
|
}*/
|
|
/*JSON{
|
|
"type" : "object",
|
|
"name" : "Bluetooth",
|
|
"instanceof" : "Serial",
|
|
"#ifdef" : "BLUETOOTH"
|
|
}
|
|
The USB Serial port
|
|
*/
|
|
|
|
void jswrap_nrf_bluetooth_init(void) {
|
|
// Initialize.
|
|
APP_TIMER_INIT(APP_TIMER_PRESCALER, APP_TIMER_OP_QUEUE_SIZE, false);
|
|
ble_stack_init();
|
|
gap_params_init();
|
|
services_init();
|
|
advertising_init();
|
|
conn_params_init();
|
|
|
|
jswrap_nrf_bluetooth_wake();
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "staticmethod",
|
|
"class" : "NRF",
|
|
"name" : "sleep",
|
|
"generate" : "jswrap_nrf_bluetooth_sleep"
|
|
}*/
|
|
void jswrap_nrf_bluetooth_sleep(void) {
|
|
uint32_t err_code;
|
|
|
|
// If connected, disconnect.
|
|
if (m_conn_handle != BLE_CONN_HANDLE_INVALID) {
|
|
err_code = sd_ble_gap_disconnect(m_conn_handle, BLE_HCI_REMOTE_USER_TERMINATED_CONNECTION);
|
|
if (err_code)
|
|
jsExceptionHere(JSET_ERROR, "Got BLE error code %d", err_code);
|
|
}
|
|
|
|
// Stop advertising
|
|
err_code = sd_ble_gap_adv_stop();
|
|
NRF_RADIO->TASKS_DISABLE = (1UL);
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "staticmethod",
|
|
"class" : "NRF",
|
|
"name" : "wake",
|
|
"generate" : "jswrap_nrf_bluetooth_wake"
|
|
}*/
|
|
void jswrap_nrf_bluetooth_wake(void) {
|
|
NRF_RADIO->TASKS_DISABLE = (0UL);
|
|
jswrap_nrf_bluetooth_startAdvertise();
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "staticmethod",
|
|
"class" : "NRF",
|
|
"name" : "getBattery",
|
|
"generate" : "jswrap_nrf_bluetooth_getBattery",
|
|
"return" : ["float", "Battery level in volts" ]
|
|
}
|
|
Get the battery level in volts
|
|
*/
|
|
JsVarFloat jswrap_nrf_bluetooth_getBattery(void) {
|
|
// Configure ADC
|
|
#ifdef NRF52
|
|
return jshReadVRef();
|
|
#else
|
|
NRF_ADC->CONFIG = (ADC_CONFIG_RES_8bit << ADC_CONFIG_RES_Pos) |
|
|
(ADC_CONFIG_INPSEL_SupplyOneThirdPrescaling << ADC_CONFIG_INPSEL_Pos) |
|
|
(ADC_CONFIG_REFSEL_VBG << ADC_CONFIG_REFSEL_Pos) |
|
|
(ADC_CONFIG_PSEL_Disabled << ADC_CONFIG_PSEL_Pos) |
|
|
(ADC_CONFIG_EXTREFSEL_None << ADC_CONFIG_EXTREFSEL_Pos);
|
|
NRF_ADC->EVENTS_END = 0;
|
|
NRF_ADC->ENABLE = ADC_ENABLE_ENABLE_Enabled;
|
|
|
|
NRF_ADC->EVENTS_END = 0; // Stop any running conversions.
|
|
NRF_ADC->TASKS_START = 1;
|
|
|
|
while (!NRF_ADC->EVENTS_END);
|
|
|
|
uint16_t vbg_in_mv = 1200;
|
|
uint8_t adc_max = 255;
|
|
uint16_t vbat_current_in_mv = (NRF_ADC->RESULT * 3 * vbg_in_mv) / adc_max;
|
|
|
|
NRF_ADC->EVENTS_END = 0;
|
|
NRF_ADC->TASKS_STOP = 1;
|
|
|
|
return vbat_current_in_mv / 1000.0;
|
|
#endif
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "staticmethod",
|
|
"class" : "NRF",
|
|
"name" : "setAdvertising",
|
|
"generate" : "jswrap_nrf_bluetooth_setAdvertising",
|
|
"params" : [
|
|
["data","JsVar","The data to advertise as an object - see below for more info"]
|
|
]
|
|
}
|
|
|
|
Data is of the form `{ UUID : data_as_byte_array }`. For example to return battery level at 95%, do:
|
|
|
|
```
|
|
NRF.setAdvertising({
|
|
0x180F : [95]
|
|
});
|
|
```
|
|
|
|
Or you could report the current temperature:
|
|
|
|
```
|
|
setInterval(function() {
|
|
NRF.setAdvertising({
|
|
0x1809 : [0|E.getTemperature()]
|
|
});
|
|
}, 30000);
|
|
```
|
|
*/
|
|
void jswrap_nrf_bluetooth_setAdvertising(JsVar *data) {
|
|
uint32_t err_code;
|
|
ble_advdata_t advdata;
|
|
setup_advdata(&advdata);
|
|
|
|
if (jsvIsObject(data)) {
|
|
ble_advdata_service_data_t *service_data = (ble_advdata_service_data_t*)alloca(jsvGetChildren(data)*sizeof(ble_advdata_service_data_t));
|
|
int n = 0;
|
|
JsvObjectIterator it;
|
|
jsvObjectIteratorNew(&it, data);
|
|
while (jsvObjectIteratorHasValue(&it)) {
|
|
service_data[n].service_uuid = jsvGetIntegerAndUnLock(jsvObjectIteratorGetKey(&it));
|
|
JsVar *v = jsvObjectIteratorGetValue(&it);
|
|
JSV_GET_AS_CHAR_ARRAY(dPtr, dLen, v);
|
|
jsvUnLock(v);
|
|
service_data[n].data.size = dLen;
|
|
service_data[n].data.p_data = (uint8_t*)dPtr;
|
|
jsvObjectIteratorNext(&it);
|
|
n++;
|
|
}
|
|
jsvObjectIteratorFree(&it);
|
|
|
|
advdata.service_data_count = n;
|
|
advdata.p_service_data_array = service_data;
|
|
} else if (!jsvIsUndefined(data)) {
|
|
jsExceptionHere(JSET_TYPEERROR, "Expecting object or undefined, got %t", data);
|
|
}
|
|
|
|
err_code = ble_advdata_set(&advdata, NULL);
|
|
if (err_code)
|
|
jsExceptionHere(JSET_ERROR, "Got BLE error code %d", err_code);
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "staticmethod",
|
|
"class" : "NRF",
|
|
"name" : "setScan",
|
|
"generate" : "jswrap_nrf_bluetooth_setScan",
|
|
"params" : [
|
|
["callback","JsVar","The callback to call with information about received, or undefined to stop"]
|
|
]
|
|
}
|
|
|
|
Start/stop listening for BLE advertising packets within range...
|
|
|
|
```
|
|
// Start scanning
|
|
NRF.setScan(function(d) {
|
|
console.log(JSON.stringify(d,null,2));
|
|
});
|
|
// prints {"rssi":-72, "addr":"##:##:##:##:##:##", "data":new ArrayBuffer([2,1,6,...])}
|
|
|
|
// Stop Scanning
|
|
NRF.setScan(false);
|
|
```
|
|
*/
|
|
void jswrap_nrf_bluetooth_setScan(JsVar *callback) {
|
|
uint32_t err_code;
|
|
// set the callback event variable
|
|
if (!jsvIsFunction(callback)) callback=0;
|
|
jsvObjectSetChild(execInfo.root, BLE_SCAN_EVENT, callback);
|
|
// either start or stop scanning
|
|
if (callback) {
|
|
ble_gap_scan_params_t m_scan_param;
|
|
// non-selective scan
|
|
m_scan_param.active = 0; // Active scanning set.
|
|
m_scan_param.selective = 0; // Selective scanning not set.
|
|
m_scan_param.interval = SCAN_INTERVAL;// Scan interval.
|
|
m_scan_param.window = SCAN_WINDOW; // Scan window.
|
|
m_scan_param.p_whitelist = NULL; // No whitelist provided.
|
|
m_scan_param.timeout = 0x0000; // No timeout.
|
|
|
|
err_code = sd_ble_gap_scan_start(&m_scan_param);
|
|
} else {
|
|
err_code = sd_ble_gap_scan_stop();
|
|
}
|
|
if (err_code)
|
|
jsExceptionHere(JSET_ERROR, "Got BLE error code %d", err_code);
|
|
}
|
|
|
|
/*JSON{
|
|
"type" : "idle",
|
|
"generate" : "jswrap_nrf_idle"
|
|
}*/
|
|
bool jswrap_nrf_idle() {
|
|
return jswrap_nrf_transmit_string()>0; // return true if we sent anything
|
|
}
|