Send file data through D7A Action Protocol demo.

Dependencies:   modem_ref_helper

Committer:
Jeej
Date:
Fri Mar 09 16:19:31 2018 +0000
Revision:
9:ef574b88e854
Parent:
7:612f4cb8d8bf
Child:
10:daa4b52991b7
Updated modem driver.

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