eculocate/ecu-esp32/src/wibble.rs

use embassy_time::Timer;
use trouble_host::prelude::*;
use esp_radio::ble::controller::BleConnector;
use esp_radio::Controller as RadioController;
use log::{warn,info};
use embassy_futures::join::join;
use embassy_futures::select::select;

use alloc::string::String;

/// Max number of connections
const CONNECTIONS_MAX: usize = 1;

/// Max number of L2CAP channels.
// XXX why not 0?
const L2CAP_CHANNELS_MAX: usize = 2; // Signal + att

// GATT Server definition
#[gatt_server]
struct Server {
    wifi_provisioning_service: WifiProvisioningService,
}


#[gatt_service(uuid = "76be25c2-0000-44fc-a97c-bcb56c69c926")]
struct WifiProvisioningService {
    #[characteristic(uuid = "76be25c2-0801-44fc-a97c-bcb56c69c926", read, notify, value = 0)]
    connection_state: u8,

    #[characteristic(uuid = "76be25c2-0802-44fc-a97c-bcb56c69c926", read, notify, value = 0)]
    max_network_index: u8,

    #[characteristic(uuid = "76be25c2-0803-44fc-a97c-bcb56c69c926", write, value = 0)]
    current_network_index: u8,

    // for arrays > 32 we must supply a default value : see
    // https://github.com/embassy-rs/trouble/issues/320
    #[characteristic(uuid = "76be25c2-0804-44fc-a97c-bcb56c69c926",
		     value = [0; 40],
		     read, notify)]
    current_network: [u8; 40],

    #[characteristic(uuid = "76be25c2-0805-44fc-a97c-bcb56c69c926",
		     value = [0; 64],
		     write)]
    secret: [u8; 64]
}


pub async fn run_ble(radio_init: &RadioController<'static>,
		     peripheral:  esp_hal::peripherals::BT<'_>) {
    //    let radio_init = esp_radio::init().expect("Failed to initialize Wi-Fi/BLE controller");
    let connector = BleConnector::new(&radio_init, peripheral, Default::default()).expect("connector");
    let controller: ExternalController<_, 20> = ExternalController::new(connector);

    // Using a fixed "random" address can be useful for testing. In real scenarios, one would
    // use e.g. the MAC 6 byte array as the address (how to get that varies by the platform).
    let address: Address = Address::random([0xff, 0x8f, 0x1a, 0x05, 0xe4, 0xff]);
    info!("Our address = {:?}", address);

    let mut resources: HostResources<DefaultPacketPool, CONNECTIONS_MAX, L2CAP_CHANNELS_MAX> = HostResources::new();
    let stack = trouble_host::new(controller, &mut resources).set_random_address(address);
    let Host {
        mut peripheral, runner, ..
    } = stack.build();

    info!("Starting advertising and GATT service");
    let server = Server::new_with_config(GapConfig::Peripheral(PeripheralConfig {
        name: "eculocate",
        appearance: &appearance::power_device::GENERIC_POWER_DEVICE,
    }))
    .unwrap();

    let _ = join(
	ble_task(runner),
	async {
            loop {
		match advertise("Eculocate", &mut peripheral, &server).await {
                    Ok(conn) => {
			// set up tasks when the connection is established to a central, so they don't run when no one is connected.
			let a = gatt_events_task(&server, &conn);
			let b = custom_task(&server, &conn, &stack);
			// run until any task ends (usually because the connection has been closed),
			// then return to advertising state.
			select(a, b).await;
                    }
                    Err(e) => {
			panic!("[adv] error: {:?}", e);
                    }
		}
            }
	})
    .await;
}

/// This is a background task that is required to run forever alongside any other BLE tasks.
///
async fn ble_task<C: Controller, P: PacketPool>(mut runner: Runner<'_, C, P>) {
    loop {
        if let Err(e) = runner.run().await {
            panic!("[ble_task] error: {:?}", e);
        }
    }
}

/// Stream Events until the connection closes.
///
/// This function will handle the GATT events and process them.
/// This is how we interact with read and write requests.
async fn gatt_events_task<P: PacketPool>(_server: &Server<'_>, conn: &GattConnection<'_, '_, P>) -> Result<(), Error> {
    // let level = server.battery_service.level;
    let reason = loop {
        match conn.next().await {
            GattConnectionEvent::Disconnected { reason } => break reason,
            GattConnectionEvent::Gatt { event } => {
                // match &event {
		//     // are these clauses important? they don't do anything
		//      // except log
                //     GattEvent::Read(event) => {
                //         if event.handle() == level.handle {
                //             let value = server.get(&level);
                //             info!("[gatt] Read Event to Level Characteristic: {:?}", value);
                //         }
                //     }
                //     GattEvent::Write(event) => {
                //         if event.handle() == level.handle {
                //             info!("[gatt] Write Event to Level Characteristic: {:?}", event.data());
                //         }
                //     }
                //     _ => {}
                // };
                // This step is also performed at drop(), but writing it explicitly is necessary
                // in order to ensure reply is sent.
                match event.accept() {
                    Ok(reply) => reply.send().await,
                    Err(e) => warn!("[gatt] error sending response: {:?}", e),
                };
            }
            _ => {} // ignore other Gatt Connection Events
        }
    };
    info!("[gatt] disconnected: {:?}", reason);
    Ok(())
}

/// Create an advertiser to use to connect to a BLE Central, and wait for it to connect.
async fn advertise<'values, 'server, C: Controller>(
    name: &'values str,
    peripheral: &mut Peripheral<'values, C, DefaultPacketPool>,
    server: &'server Server<'values>,
) -> Result<GattConnection<'values, 'server, DefaultPacketPool>, BleHostError<C::Error>> {
    let mut advertiser_data = [0; 31];
    let len = AdStructure::encode_slice(
        &[
            AdStructure::Flags(LE_GENERAL_DISCOVERABLE | BR_EDR_NOT_SUPPORTED),
            AdStructure::ServiceUuids16(&[[0x0f, 0x18]]),
            AdStructure::CompleteLocalName(name.as_bytes()),
        ],
        &mut advertiser_data[..],
    )?;
    let advertiser = peripheral
        .advertise(
            &Default::default(),
            Advertisement::ConnectableScannableUndirected {
                adv_data: &advertiser_data[..len],
                scan_data: &[],
            },
        )
        .await?;
    info!("[adv] advertising");
    let conn = advertiser.accept().await?.with_attribute_server(server)?;
    info!("[adv] connection established");
    Ok(conn)
}

async fn custom_task<C: Controller, P: PacketPool>(
    _server: &Server<'_>,
    conn: &GattConnection<'_, '_, P>,
    stack: &Stack<'_, C, P>,
) {
    // let mut tick: u8 = 0;
    // let level = server.battery_service.level;
    // let rpm = server.engine_speed_service.rpm;
    loop {
        // tick = tick.wrapping_add(1);
        // info!("[custom_task] notifying connection of tick {}", tick);

	// // if the characteristic does not support notifications,
	// // this would return an error. Use `set` instead, in that case.
	// // See inline comments in trouble-host/src/attribute.rs around
	// // line 631

        // if level.notify(conn, &tick).await.is_err() {
        //     info!("[custom_task] error notifying connection");
        //     break;
        // };
        // read RSSI (Received Signal Strength Indicator) of the connection.
        if let Ok(rssi) = conn.raw().rssi(stack).await {
            info!("[custom_task] RSSI: {:?}", rssi);
        } else {
            info!("[custom_task] error getting RSSI");
            break;
        };
	// let new_rpm  = 1200 + 20 * i32::from(tick);
	// rpm.notify(conn, &new_rpm).await.expect("failed to notify");

        Timer::after_secs(2).await;
    }
}