Send file data through D7A Action Protocol demo.

Dependencies:   modem_ref_helper

Committer:
Jeej
Date:
Thu Oct 11 14:58:29 2018 +0000
Revision:
12:e0dba9c55dff
Parent:
11:a3308870afac
Child:
13:475a2286deef
Relaxed modem version check.

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