Send file data through D7A Action Protocol demo.

Dependencies:   modem_ref_helper

Committer:
Jeej
Date:
Thu Oct 11 09:54:18 2018 +0000
Revision:
11:a3308870afac
Parent:
10:daa4b52991b7
Child:
12:e0dba9c55dff
v1.0.2 Updated API

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Jeej 0:3058da317f01 1 // @autor: jeremie@wizzilab.com
Jeej 0:3058da317f01 2 // @date: 2017-05-02
Jeej 0:3058da317f01 3
Jeej 5:4da1ea72e7b4 4 #include "modem_ref_helper.h"
Jeej 0:3058da317f01 5 #include "modem_callbacks.h"
Jeej 5:4da1ea72e7b4 6 #include "files.h"
Jeej 0:3058da317f01 7 #include "sensor.h"
Jeej 0:3058da317f01 8
Jeej 7:612f4cb8d8bf 9 #define MIN_REPORT_PERIOD (10) // Seconds
Jeej 7:612f4cb8d8bf 10
Jeej 0:3058da317f01 11 Semaphore modem_ready(0);
Jeej 0:3058da317f01 12 sensor_config_t g_light_config;
Jeej 0:3058da317f01 13 Queue<void, 8> g_file_modified;
Jeej 0:3058da317f01 14
Jeej 10:daa4b52991b7 15 void print_status(uint8_t id, int status)
Jeej 10:daa4b52991b7 16 {
Jeej 10:daa4b52991b7 17 switch (status)
Jeej 10:daa4b52991b7 18 {
Jeej 10:daa4b52991b7 19 case ALP_ERR_NONE:
Jeej 10:daa4b52991b7 20 PRINT("Status[%d]: OK\n", id);
Jeej 10:daa4b52991b7 21 break;
Jeej 10:daa4b52991b7 22 default:
Jeej 10:daa4b52991b7 23 PRINT("Status[%d]: error %d\n", id, status);
Jeej 10:daa4b52991b7 24 break;
Jeej 10:daa4b52991b7 25 }
Jeej 10:daa4b52991b7 26 }
Jeej 10:daa4b52991b7 27
Jeej 10:daa4b52991b7 28 // Callback for id User
Jeej 10:daa4b52991b7 29 void my_main_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 10:daa4b52991b7 30 {
Jeej 10:daa4b52991b7 31 print_status(id, err);
Jeej 10:daa4b52991b7 32
Jeej 10:daa4b52991b7 33 if (terminal)
Jeej 10:daa4b52991b7 34 {
Jeej 10:daa4b52991b7 35 modem_ready.release();
Jeej 10:daa4b52991b7 36 }
Jeej 10:daa4b52991b7 37 }
Jeej 0:3058da317f01 38
Jeej 7:612f4cb8d8bf 39 static bool report_ok(uint32_t last_report_time)
Jeej 7:612f4cb8d8bf 40 {
Jeej 7:612f4cb8d8bf 41 // Do not send a report if it's been less than MIN_REPORT_PERIOD since the last report
Jeej 7:612f4cb8d8bf 42 if ((last_report_time/1000) < MIN_REPORT_PERIOD)
Jeej 7:612f4cb8d8bf 43 {
Jeej 7:612f4cb8d8bf 44 PRINT("Report Skipped, next in %ds min\n", MIN_REPORT_PERIOD - (last_report_time/1000));
Jeej 7:612f4cb8d8bf 45 return false;
Jeej 7:612f4cb8d8bf 46 }
Jeej 7:612f4cb8d8bf 47
Jeej 7:612f4cb8d8bf 48 return true;
Jeej 7:612f4cb8d8bf 49 }
Jeej 7:612f4cb8d8bf 50
Jeej 0:3058da317f01 51 // Check parameters to see if data should be send
Jeej 10:daa4b52991b7 52 static bool report_needed(sensor_config_t* config, int32_t value, int32_t last_value, uint32_t last_report_time, uint8_t id)
Jeej 0:3058da317f01 53 {
Jeej 7:612f4cb8d8bf 54 switch (config->report_type)
Jeej 0:3058da317f01 55 {
Jeej 0:3058da317f01 56 case REPORT_ALWAYS:
Jeej 0:3058da317f01 57 // Send a report at each measure
Jeej 10:daa4b52991b7 58 PRINT("Report[%d] always\r\n", id);
Jeej 7:612f4cb8d8bf 59 return report_ok(last_report_time);
Jeej 0:3058da317f01 60 case REPORT_ON_DIFFERENCE:
Jeej 0:3058da317f01 61 // Send a report when the difference between the last reported measure and the current mesure is greater than max_diff
Jeej 7:612f4cb8d8bf 62 if (abs(last_value - value) >= config->max_diff && config->max_diff)
Jeej 0:3058da317f01 63 {
Jeej 10:daa4b52991b7 64 PRINT("Report[%d] on difference (last:%d new:%d max_diff:%d)\r\n", id, last_value, value, config->max_diff);
Jeej 7:612f4cb8d8bf 65 return report_ok(last_report_time);
Jeej 0:3058da317f01 66 }
Jeej 0:3058da317f01 67 break;
Jeej 0:3058da317f01 68 case REPORT_ON_THRESHOLD:
Jeej 0:3058da317f01 69 // Send a report when crossing a threshold
Jeej 7:612f4cb8d8bf 70 if ( (value >= config->threshold_high && last_value < config->threshold_high)
Jeej 7:612f4cb8d8bf 71 || (value <= config->threshold_low && last_value > config->threshold_low)
Jeej 7:612f4cb8d8bf 72 || (value < config->threshold_high && last_value >= config->threshold_high)
Jeej 7:612f4cb8d8bf 73 || (value > config->threshold_low && last_value <= config->threshold_low))
Jeej 0:3058da317f01 74 {
Jeej 10:daa4b52991b7 75 PRINT("Report[%d] on threshold (last:%d new:%d th:%d tl:%d)\r\n", id, last_value, value, config->threshold_high, config->threshold_low);
Jeej 7:612f4cb8d8bf 76 return report_ok(last_report_time);
Jeej 0:3058da317f01 77 }
Jeej 0:3058da317f01 78 break;
Jeej 0:3058da317f01 79 default:
Jeej 0:3058da317f01 80 break;
Jeej 0:3058da317f01 81 }
Jeej 0:3058da317f01 82
Jeej 0:3058da317f01 83 // Send a report if it's been more than max_period since the last report
Jeej 7:612f4cb8d8bf 84 if (((last_report_time/1000) >= config->max_period) && config->max_period)
Jeej 0:3058da317f01 85 {
Jeej 10:daa4b52991b7 86 PRINT("Report[%d] on period (max_period:%d time:%d)\r\n", id, config->max_period, last_report_time);
Jeej 7:612f4cb8d8bf 87 return report_ok(last_report_time);
Jeej 0:3058da317f01 88 }
Jeej 0:3058da317f01 89
Jeej 0:3058da317f01 90 return false;
Jeej 0:3058da317f01 91 }
Jeej 0:3058da317f01 92
Jeej 0:3058da317f01 93 void thread_sensor_light()
Jeej 0:3058da317f01 94 {
Jeej 6:d4512d8f5dff 95 light_value_t light_level;
Jeej 6:d4512d8f5dff 96 light_value_t light_level_old = 0;
Jeej 0:3058da317f01 97
Jeej 0:3058da317f01 98 // To force a first report
Jeej 0:3058da317f01 99 uint32_t last_report_time = 0xFFFFFFFF;
Jeej 10:daa4b52991b7 100 uint8_t id = modem_get_id(my_main_callback);
Jeej 0:3058da317f01 101
Jeej 0:3058da317f01 102 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:3058da317f01 103
Jeej 0:3058da317f01 104 // Get the sensor configuration
Jeej 0:3058da317f01 105 ram_fs_read(FID_SENSOR_CONFIG, 0, SIZE_SENSOR_CONFIG, (uint8_t*)&g_light_config);
Jeej 0:3058da317f01 106
Jeej 0:3058da317f01 107 while (true)
Jeej 0:3058da317f01 108 {
Jeej 0:3058da317f01 109 light_level = sensor_get_light();
Jeej 0:3058da317f01 110
Jeej 0:3058da317f01 111 PRINT("Light %d\r\n", light_level);
Jeej 0:3058da317f01 112
Jeej 10:daa4b52991b7 113 if (report_needed(&g_light_config, light_level, light_level_old, last_report_time, id))
Jeej 0:3058da317f01 114 {
Jeej 0:3058da317f01 115 PRINT("Light report %d\r\n", light_level);
Jeej 0:3058da317f01 116
Jeej 0:3058da317f01 117 // Send notification
Jeej 10:daa4b52991b7 118 modem_write_file(FID_SENSOR_LIGHT, &light_level, 0, SIZE_SENSOR_LIGHT, id);
Jeej 0:3058da317f01 119 modem_ready.wait();
Jeej 0:3058da317f01 120
Jeej 0:3058da317f01 121 // Update
Jeej 0:3058da317f01 122 light_level_old = light_level;
Jeej 0:3058da317f01 123 last_report_time = 0;
Jeej 0:3058da317f01 124 }
Jeej 0:3058da317f01 125
Jeej 0:3058da317f01 126 // Update last report time
Jeej 0:3058da317f01 127 last_report_time += g_light_config.read_period;
Jeej 0:3058da317f01 128
Jeej 0:3058da317f01 129 Thread::wait(g_light_config.read_period);
Jeej 0:3058da317f01 130 }
Jeej 0:3058da317f01 131 }
Jeej 0:3058da317f01 132
Jeej 0:3058da317f01 133 void thread_file_modified()
Jeej 0:3058da317f01 134 {
Jeej 0:3058da317f01 135 uint8_t fid;
Jeej 0:3058da317f01 136 osEvent evt;
Jeej 0:3058da317f01 137
Jeej 0:3058da317f01 138 while (true)
Jeej 0:3058da317f01 139 {
Jeej 0:3058da317f01 140 evt = g_file_modified.get();
Jeej 0:3058da317f01 141 fid = (evt.status == osEventMessage)? (uint8_t)(uint32_t)evt.value.p : NULL;
Jeej 0:3058da317f01 142
Jeej 0:3058da317f01 143 switch (fid)
Jeej 0:3058da317f01 144 {
Jeej 0:3058da317f01 145 case FID_SENSOR_CONFIG:
Jeej 0:3058da317f01 146 // Update sensor configuration
Jeej 0:3058da317f01 147 ram_fs_read(FID_SENSOR_CONFIG, 0, SIZE_SENSOR_CONFIG, (uint8_t*)&g_light_config);
Jeej 0:3058da317f01 148 PRINT("Sensor configuration updated\r\n");
Jeej 0:3058da317f01 149 break;
Jeej 0:3058da317f01 150 default:
Jeej 0:3058da317f01 151 break;
Jeej 0:3058da317f01 152 }
Jeej 0:3058da317f01 153 }
Jeej 0:3058da317f01 154 }
Jeej 0:3058da317f01 155
Jeej 0:3058da317f01 156 // Misc
Jeej 0:3058da317f01 157 // ============================================================{{{
Jeej 0:3058da317f01 158
Jeej 0:3058da317f01 159 void my_get_alp_file_props(uint8_t fid, alp_file_header_t* hdr)
Jeej 0:3058da317f01 160 {
Jeej 0:3058da317f01 161 memcpy(hdr, ram_fs_get_header(fid), sizeof(alp_file_header_t));
Jeej 0:3058da317f01 162 }
Jeej 0:3058da317f01 163
Jeej 0:3058da317f01 164 modem_callbacks_t callbacks = {
Jeej 0:3058da317f01 165 .read = my_read,
Jeej 0:3058da317f01 166 .write = my_write,
Jeej 0:3058da317f01 167 .read_fprop = my_read_fprop,
Jeej 0:3058da317f01 168 .flush = my_flush,
Jeej 0:3058da317f01 169 .remove = my_delete,
Jeej 5:4da1ea72e7b4 170 .udata = my_udata,
Jeej 0:3058da317f01 171 .lqual = my_lqual,
Jeej 0:3058da317f01 172 .ldown = my_ldown,
Jeej 0:3058da317f01 173 .reset = my_reset,
Jeej 10:daa4b52991b7 174 .boot = my_boot,
Jeej 10:daa4b52991b7 175 .busy = my_busy,
Jeej 0:3058da317f01 176 };
Jeej 0:3058da317f01 177
Jeej 0:3058da317f01 178 /*** Main function ------------------------------------------------------------- ***/
Jeej 0:3058da317f01 179 int main()
Jeej 0:3058da317f01 180 {
Jeej 0:3058da317f01 181 // Start & initialize
Jeej 5:4da1ea72e7b4 182 #ifdef DEBUG_LED
Jeej 0:3058da317f01 183 DBG_OPEN(DEBUG_LED);
Jeej 5:4da1ea72e7b4 184 #else
Jeej 5:4da1ea72e7b4 185 DBG_OPEN(NC);
Jeej 5:4da1ea72e7b4 186 #endif
Jeej 9:ef574b88e854 187 PRINT("\n"
Jeej 9:ef574b88e854 188 "-----------------------------------------\n"
Jeej 9:ef574b88e854 189 "---------- Demo send and forget ---------\n"
Jeej 9:ef574b88e854 190 "-----------------------------------------\n");
Jeej 0:3058da317f01 191
Jeej 5:4da1ea72e7b4 192 modem_helper_open(&callbacks);
Jeej 0:3058da317f01 193
Jeej 10:daa4b52991b7 194 uint8_t id = modem_get_id(my_main_callback);
Jeej 0:3058da317f01 195
Jeej 0:3058da317f01 196 DPRINT("Register Files\n");
Jeej 11:a3308870afac 197
Jeej 0:3058da317f01 198 // Create report file on modem.
Jeej 3:e905bf88e8a9 199 modem_update_file(FID_SENSOR_LIGHT, (alp_file_header_t*)&h_sensor_light, NULL);
Jeej 3:e905bf88e8a9 200
Jeej 0:3058da317f01 201 // Allow remote access.
Jeej 3:e905bf88e8a9 202 modem_update_file(FID_SENSOR_CONFIG, (alp_file_header_t*)&h_sensor_config, (uint8_t*)&f_sensor_config);
Jeej 0:3058da317f01 203
Jeej 0:3058da317f01 204 // Configure URC: LQUAL on report file notification every 10 reports
Jeej 0:3058da317f01 205 PRINT("Setup URCs\n");
Jeej 10:daa4b52991b7 206 modem_enable_urc(ALP_URC_TYPE_LQUAL, IFID_REPORT, 10, true, id);
Jeej 0:3058da317f01 207 modem_ready.wait();
Jeej 0:3058da317f01 208
Jeej 0:3058da317f01 209 PRINT("Start D7A Stack\n");
Jeej 10:daa4b52991b7 210 modem_activate_itf(ALP_ITF_TYPE_D7A, 24, 0, ALP_D7A_ISTAT_RESP , true, id);
Jeej 0:3058da317f01 211 modem_ready.wait();
Jeej 0:3058da317f01 212
Jeej 0:3058da317f01 213 PRINT("Notify Modem Version\n");
Jeej 10:daa4b52991b7 214 modem_notify_file(D7A_FID_FIRMWARE_VERSION, 0, SIZE_HOST_REV, id);
Jeej 0:3058da317f01 215 modem_ready.wait();
Jeej 0:3058da317f01 216
Jeej 0:3058da317f01 217 PRINT("Notify FW Version\n");
Jeej 11:a3308870afac 218 uint8_t default_root_key[16] = DEFAULT_ROOT_KEY;
Jeej 11:a3308870afac 219 modem_notify_host_rev(&f_rev, &h_rev, default_root_key);
Jeej 0:3058da317f01 220
Jeej 10:daa4b52991b7 221 modem_free_id(id);
Jeej 10:daa4b52991b7 222
Jeej 0:3058da317f01 223 // Start file modified thread
Jeej 0:3058da317f01 224 Thread th_file_modified(osPriorityNormal, 1024, NULL);
Jeej 0:3058da317f01 225 osStatus status = th_file_modified.start(thread_file_modified);
Jeej 0:3058da317f01 226 ASSERT(status == osOK, "Failed to start thread_file_modified (err: %d)\r\n", status);
Jeej 0:3058da317f01 227
Jeej 0:3058da317f01 228 // Start light measure thread
Jeej 0:3058da317f01 229 Thread th_sensor_light(osPriorityNormal, 1024, NULL);
Jeej 0:3058da317f01 230 status = th_sensor_light.start(thread_sensor_light);
Jeej 0:3058da317f01 231 ASSERT(status == osOK, "Failed to start thread_sensor_light (err: %d)\r\n", status);
Jeej 0:3058da317f01 232
Jeej 5:4da1ea72e7b4 233 #ifdef DEBUG_LED
Jeej 0:3058da317f01 234 DigitalOut my_led(DEBUG_LED);
Jeej 0:3058da317f01 235 #endif
Jeej 0:3058da317f01 236
Jeej 0:3058da317f01 237 // Set main task to lowest priority
Jeej 0:3058da317f01 238 osThreadSetPriority(osThreadGetId(), osPriorityIdle);
Jeej 0:3058da317f01 239 while(true)
Jeej 0:3058da317f01 240 {
Jeej 0:3058da317f01 241 Thread::wait(500);
Jeej 5:4da1ea72e7b4 242 #ifdef DEBUG_LED
Jeej 0:3058da317f01 243 my_led = !my_led;
Jeej 0:3058da317f01 244 #endif
Jeej 0:3058da317f01 245 }
Jeej 0:3058da317f01 246 }