BLE Lightning sensor for Nordic NRF51822 based module
Dependencies: AS3935 AS3935_ext BLE_API mbed nRF51822 nrf51_rtc
main.cpp
- Committer:
- takafuminaka
- Date:
- 2015-08-27
- Revision:
- 1:a4119049dd99
- Parent:
- 0:371bcac81ea2
- Child:
- 2:e1e638cbf972
File content as of revision 1:a4119049dd99:
/* */ #include "mbed.h" #include "BLE.h" #include "nrf51_rtc.h" #include "AS3935_ext.h" #include "nrf_soc.h" // for internal Thermo sensoer #define NEED_CONSOLE_OUTPUT 1 /* Set this if you need debug messages on the console; * it will have an impact on code-size and power consumption. */ #if NEED_CONSOLE_OUTPUT Serial pc(USBTX, USBRX); #define DEBUG(...) { pc.printf(__VA_ARGS__); } #else #define DEBUG(...) /* nothing */ #endif /* #if NEED_CONSOLE_OUTPUT */ // Prepare BLE device BLEDevice ble; const static char DEVICE_NAME[] = "BLE-LITNING-S"; /* Health Thermometer Service */ /* Service: https://developer.bluetooth.org/gatt/services/Pages/ServiceViewer.aspx?u=org.bluetooth.service.health_thermometer.xml */ /* HTM Char: https://developer.bluetooth.org/gatt/characteristics/Pages/CharacteristicViewer.aspx?u=org.bluetooth.characteristic.temperature_measurement.xml */ uint8_t thermTempPayload[5] = { 0, 0, 0, 0, 0 }; GattCharacteristic tempChar (GattCharacteristic::UUID_TEMPERATURE_MEASUREMENT_CHAR, thermTempPayload, sizeof(thermTempPayload), sizeof(thermTempPayload), GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_INDICATE); GattCharacteristic *htmChars[] = {&tempChar, }; GattService htmService(GattService::UUID_HEALTH_THERMOMETER_SERVICE, htmChars, sizeof(htmChars) / sizeof(GattCharacteristic *)); /* Original Thermometer Service */ /* with nRF51822 internal thermal sensor */ uint8_t internalTempPayload[5] = { 0, 0, 0, 0, 0 }; GattCharacteristic internalTempChar (GattCharacteristic::UUID_TEMPERATURE_MEASUREMENT_CHAR + 0x2000, internalTempPayload, sizeof(internalTempPayload), sizeof(internalTempPayload), GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_INDICATE); GattCharacteristic *itmChars[] = {&internalTempChar, }; GattService itmService(GattService::UUID_HEALTH_THERMOMETER_SERVICE + 0x2000, itmChars, sizeof(itmChars) / sizeof(GattCharacteristic *)); /* Battery Level Service */ uint8_t batt = 98; /* Battery level */ uint8_t read_batt = 0; /* Variable to hold battery level reads */ static uint8_t bpm2[1] = {batt}; GattCharacteristic battLevel ( GattCharacteristic::UUID_BATTERY_LEVEL_CHAR, bpm2, sizeof(bpm2), sizeof(bpm2), GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_NOTIFY | GattCharacteristic::BLE_GATT_CHAR_PROPERTIES_READ); GattCharacteristic *battChars[] = {&battLevel, }; GattService battService(GattService::UUID_BATTERY_SERVICE, battChars, sizeof(battChars) / sizeof(GattCharacteristic *)); static const uint16_t uuid16_list[] = {GattService::UUID_HEALTH_THERMOMETER_SERVICE, GattService::UUID_BATTERY_SERVICE, GattService::UUID_HEALTH_THERMOMETER_SERVICE + 0x2000 }; static volatile bool triggerSensorPolling = false; /* set to high periodically to indicate to the main thread that * polling is necessary. */ static Gap::ConnectionParams_t connectionParams; uint32_t quick_ieee11073_from_float(float temperature); void Update_Values(); // Prepare LED device DigitalOut led1(LED1); DigitalOut led2(LED2); AS3935_ext Lightning(I2C_SDA0,I2C_SCL0,0x00,P0_23); InterruptIn IntLightning(P0_23); //IRQ AS3935 // used for the example only, not required for rtc use DigitalIn button1(BUTTON1); // used to trigger the time report InterruptIn button1Press(BUTTON1); time_t example_time() { // set an intial time // ...not really necessary for this example, but it beats setting it to 0 or some non-obvious large integer (# of seconds since 1/1/1970) time_t rawtime=0; struct tm * init_timeinfo; // initialize time init_timeinfo = localtime(&rawtime); // note: must initialize the struct with this before trying to set components // ...else code goes into the weeds!! init_timeinfo->tm_sec = 0; init_timeinfo->tm_min = 0; init_timeinfo->tm_hour = 0; init_timeinfo->tm_mon = 0; init_timeinfo->tm_mday = 1; init_timeinfo->tm_year = 0; char date[24]; strftime(date,sizeof(date),"%H:%M:%S on %m/%d/%G",init_timeinfo); DEBUG("Initial time set is %s.\r\n",date); // compute the proper value for time in time_t type rawtime = mktime(init_timeinfo); return rawtime; } void print_time() { // called when a button is pushed, this prints the current time to the USB-connected console time_t rawtime=rtc.time(); // massage the time into a human-friendly format for printing struct tm * timeinfo; timeinfo = localtime(&rawtime); char date[24]; strftime(date,sizeof(date),"%H:%M:%S on %m/%d/%G",timeinfo); DEBUG("The current time is %s.(%d)\r\n",date,rawtime); } void periodic_update() { // for use as interrupt routine, to insure that RTC is updated periodically // ...if rtc is not read before the underlying counter rolls over (typically 512 seconds), the RTC value will be wrong // ...ideally this would be done as part of the nrf51_rtc method, but I couldn't get it to behave (see nrf51_rtc.cpp for details) rtc.time(); Lightning.lightningDistanceKm(); led1 = !led1; triggerSensorPolling = true; // print_time(); } void DetectLightning() { char OriginInt; time_t rawtime=rtc.time(); struct tm * timeinfo; timeinfo = localtime(&rawtime); char date[24]; int distance; strftime(date,sizeof(date),"%H:%M:%S on %m/%d/%G",timeinfo); wait_ms(2); //on attend 2ms préconisation constructeur OriginInt = Lightning.interruptSource(); distance = Lightning.lightningDistanceKm(); if (OriginInt == 1) { led2 = !led2; DEBUG("%24s : Noise level too high. %d km\r\n",date,distance); } if (OriginInt == 4) { led2 = !led2; DEBUG("%24s : Disturber detected. %d km\r\n",date,distance); } if (OriginInt == 8) { led2 = !led2; DEBUG("%24s : Lightning interrupt %d km\r\n",date,distance); } } void disconnectionCallback(Gap::Handle_t handle, Gap::DisconnectionReason_t reason) // Mod { DEBUG("Disconnected handle %u!\n\r", handle); DEBUG("Restarting the advertising process\n\r"); led2 = 0; ble.gap().startAdvertising(); } void onConnectionCallback(const Gap::ConnectionCallbackParams_t *params) { DEBUG("connected. Got handle %u\r\n", params->handle); connectionParams.slaveLatency = 1; led2 = 1; if (ble.gap().updateConnectionParams(params->handle, &connectionParams) != BLE_ERROR_NONE) { DEBUG("failed to update connection paramter\r\n"); } } int main(void) { led1=0; led2=0; int hz=0; //initialisations DEBUG("reset\r\n"); Lightning.reset(); DEBUG("setTuneCap as 5\r\n"); Lightning.setTuneCap(5); // Tuning Parameter DEBUG("powerup\r\n"); Lightning.powerUp(); DEBUG("setOutdoors\r\n"); Lightning.setOutdoors(); // Set Device into Outdoor mode DEBUG("Auto Calibration Start\r\n"); float minerr = 100; int fincap = 7; for(int i=0;i<16;i++) { Lightning.setTuneCap(i); // Tuning Parameter hz = Lightning.MeasureLCOFreq(); float err = (hz-500000.)/500000.*100.; DEBUG("%d : hz=%10d Hz (%5.2f%%)\r\n",i,hz,err); if ( abs(err) < minerr ) { minerr = abs(err); fincap = i; } } Lightning.setTuneCap(fincap); // Tuning Parameter wait_ms(100); hz = Lightning.MeasureLCOFreq(); float err = (hz-500000.)/500000.*100.; DEBUG("Final %d : hz=%10d Hz (%5.2f%%)\r\n",fincap,hz,err); DEBUG("Auto Calibration finished\r\n"); // user selectable, any time < 512 seconds is OK #define PERIODIC_UPDATE 1 Ticker rtc_ticker; rtc_ticker.attach(&periodic_update, PERIODIC_UPDATE); time_t initial_time = example_time(); rtc.set_time(initial_time); button1Press.fall(&print_time); // when button1 is pressed, this calls rtc.time() and prints it IntLightning.rise(&DetectLightning); ble.init(); ble.gap().onDisconnection(disconnectionCallback); ble.gap().onConnection(onConnectionCallback); ble.gap().getPreferredConnectionParams(&connectionParams); /* setup advertising */ ble.gap().accumulateAdvertisingPayload(GapAdvertisingData::BREDR_NOT_SUPPORTED | GapAdvertisingData::LE_GENERAL_DISCOVERABLE); ble.gap().accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LIST_16BIT_SERVICE_IDS, (uint8_t*)uuid16_list, sizeof(uuid16_list)); ble.gap().accumulateAdvertisingPayload(GapAdvertisingData::GENERIC_THERMOMETER); ble.gap().accumulateAdvertisingPayload(GapAdvertisingData::COMPLETE_LOCAL_NAME, (uint8_t *)DEVICE_NAME, sizeof(DEVICE_NAME)); ble.gap().setAdvertisingType(GapAdvertisingParams::ADV_CONNECTABLE_UNDIRECTED); ble.gap().setAdvertisingInterval(160); /* 100ms; in multiples of 0.625ms. */ ble.gap().startAdvertising(); ble.gattServer().addService(htmService); ble.gattServer().addService(battService); while (true) { if (triggerSensorPolling) { triggerSensorPolling = false; Update_Values(); } else { ble.waitForEvent(); } } } void Update_Values() { /* Update the temperature. Note that we need to convert to an ieee11073 format float. */ int32_t p_temp; sd_temp_get(&p_temp); float temperature = float(p_temp)/4.; temperature -= 14.; // It should be changed device by device. // DEBUG("temp:%f\n\r", temperature); uint32_t temp_ieee11073 = quick_ieee11073_from_float(temperature); memcpy(thermTempPayload+1, &temp_ieee11073, 4); /* Battery Service Update */ /* Update battery level */ //ble.getGattServer().updateValue(battLevel.handle, (uint8_t*)&batt, sizeof(batt)); /* Decrement the battery level. */ batt <=50 ? batt=100 : batt--;; bpm2[0] = batt; if (ble.gap().getState().connected ) { ble.gattServer().write(tempChar.getValueAttribute().getHandle(), thermTempPayload, sizeof(thermTempPayload)); ble.gattServer().write(battLevel.getValueAttribute().getHandle(), (uint8_t *)&batt, sizeof(batt)); } } /** * @brief A very quick conversion between a float temperature and 11073-20601 FLOAT-Type. * @param temperature The temperature as a float. * @return The temperature in 11073-20601 FLOAT-Type format. */ uint32_t quick_ieee11073_from_float(float temperature) { uint8_t exponent = 0xFE; //exponent is -2 uint32_t mantissa = (uint32_t)(temperature*100); return ( ((uint32_t)exponent) << 24) | mantissa; }