Send file data through D7A Action Protocol demo.

Dependencies:   modem_ref_helper

Committer:
Jeej
Date:
Thu May 11 14:49:14 2017 +0000
Revision:
0:3058da317f01
Child:
3:e905bf88e8a9
Updated init.

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 0:3058da317f01 4 #include "mbed.h"
Jeej 0:3058da317f01 5 #include "rtos.h"
Jeej 0:3058da317f01 6 #include "WizziDebug.h"
Jeej 0:3058da317f01 7 #include "WizziCom.h"
Jeej 0:3058da317f01 8
Jeej 0:3058da317f01 9 #include "hwcfg.h"
Jeej 0:3058da317f01 10 #include "files.h"
Jeej 0:3058da317f01 11 #include "ram_fs.h"
Jeej 0:3058da317f01 12 #include "modem_callbacks.h"
Jeej 0:3058da317f01 13
Jeej 0:3058da317f01 14 #include "revision.h"
Jeej 0:3058da317f01 15 #include "alp_spec.h"
Jeej 0:3058da317f01 16 #include "alp_helpers.h"
Jeej 0:3058da317f01 17 #include "modem_ref.h"
Jeej 0:3058da317f01 18 #include "kal_fs.h"
Jeej 0:3058da317f01 19 #include "d7a_1x.h"
Jeej 0:3058da317f01 20 #include "alp.h"
Jeej 0:3058da317f01 21
Jeej 0:3058da317f01 22 #include "sensor.h"
Jeej 0:3058da317f01 23
Jeej 0:3058da317f01 24 WizziCom* g_modem_com;
Jeej 0:3058da317f01 25 Semaphore modem_ready(0);
Jeej 0:3058da317f01 26 sensor_config_t g_light_config;
Jeej 0:3058da317f01 27 Queue<void, 8> g_file_modified;
Jeej 0:3058da317f01 28
Jeej 0:3058da317f01 29 uint8_t g_main_id, g_report_id;
Jeej 0:3058da317f01 30
Jeej 0:3058da317f01 31 // Check parameters to see if data should be send
Jeej 0:3058da317f01 32 static bool report_needed(sensor_config_t* cfg, int32_t value, int32_t last_value, uint32_t last_report_time)
Jeej 0:3058da317f01 33 {
Jeej 0:3058da317f01 34 switch (cfg->report_type)
Jeej 0:3058da317f01 35 {
Jeej 0:3058da317f01 36 case REPORT_ALWAYS:
Jeej 0:3058da317f01 37 // Send a report at each measure
Jeej 0:3058da317f01 38 IPRINT("Report always\r\n");
Jeej 0:3058da317f01 39 return true;
Jeej 0:3058da317f01 40 case REPORT_ON_DIFFERENCE:
Jeej 0:3058da317f01 41 // Send a report when the difference between the last reported measure and the current mesure is greater than max_diff
Jeej 0:3058da317f01 42 if (abs(last_value - value) >= cfg->max_diff && cfg->max_diff)
Jeej 0:3058da317f01 43 {
Jeej 0:3058da317f01 44 IPRINT("Report on difference (last:%d new:%d max_diff:%d)\r\n", last_value, value, cfg->max_diff);
Jeej 0:3058da317f01 45 return true;
Jeej 0:3058da317f01 46 }
Jeej 0:3058da317f01 47 break;
Jeej 0:3058da317f01 48 case REPORT_ON_THRESHOLD:
Jeej 0:3058da317f01 49 // Send a report when crossing a threshold
Jeej 0:3058da317f01 50 if ( (value >= cfg->threshold_high && last_value < cfg->threshold_high)
Jeej 0:3058da317f01 51 || (value <= cfg->threshold_low && last_value > cfg->threshold_low)
Jeej 0:3058da317f01 52 || (value < cfg->threshold_high && last_value >= cfg->threshold_high)
Jeej 0:3058da317f01 53 || (value > cfg->threshold_low && last_value <= cfg->threshold_low))
Jeej 0:3058da317f01 54 {
Jeej 0:3058da317f01 55 IPRINT("Rerport on threshold (last:%d new:%d th:%d tl:%d)\r\n", last_value, value, cfg->threshold_high, cfg->threshold_low);
Jeej 0:3058da317f01 56 return true;
Jeej 0:3058da317f01 57 }
Jeej 0:3058da317f01 58 break;
Jeej 0:3058da317f01 59 default:
Jeej 0:3058da317f01 60 break;
Jeej 0:3058da317f01 61 }
Jeej 0:3058da317f01 62
Jeej 0:3058da317f01 63 // Send a report if it's been more than max_period since the last report
Jeej 0:3058da317f01 64 if (((last_report_time/1000) >= cfg->max_period) && cfg->max_period)
Jeej 0:3058da317f01 65 {
Jeej 0:3058da317f01 66 IPRINT("Report on period (max_period:%d time:%d)\r\n", cfg->max_period, last_report_time);
Jeej 0:3058da317f01 67 return true;
Jeej 0:3058da317f01 68 }
Jeej 0:3058da317f01 69
Jeej 0:3058da317f01 70 return false;
Jeej 0:3058da317f01 71 }
Jeej 0:3058da317f01 72
Jeej 0:3058da317f01 73 void thread_sensor_light()
Jeej 0:3058da317f01 74 {
Jeej 0:3058da317f01 75 uint8_t light_level;
Jeej 0:3058da317f01 76 uint8_t light_level_old = 0;
Jeej 0:3058da317f01 77
Jeej 0:3058da317f01 78 // To force a first report
Jeej 0:3058da317f01 79 uint32_t last_report_time = 0xFFFFFFFF;
Jeej 0:3058da317f01 80
Jeej 0:3058da317f01 81 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:3058da317f01 82
Jeej 0:3058da317f01 83 // Get the sensor configuration
Jeej 0:3058da317f01 84 ram_fs_read(FID_SENSOR_CONFIG, 0, SIZE_SENSOR_CONFIG, (uint8_t*)&g_light_config);
Jeej 0:3058da317f01 85
Jeej 0:3058da317f01 86 while (true)
Jeej 0:3058da317f01 87 {
Jeej 0:3058da317f01 88 light_level = sensor_get_light();
Jeej 0:3058da317f01 89
Jeej 0:3058da317f01 90 PRINT("Light %d\r\n", light_level);
Jeej 0:3058da317f01 91
Jeej 0:3058da317f01 92 if (report_needed(&g_light_config, light_level, light_level_old, last_report_time))
Jeej 0:3058da317f01 93 {
Jeej 0:3058da317f01 94 PRINT("Light report %d\r\n", light_level);
Jeej 0:3058da317f01 95
Jeej 0:3058da317f01 96 // Send notification
Jeej 0:3058da317f01 97 modem_write_file(FID_SENSOR_LIGHT, &light_level, 0, SIZE_SENSOR_LIGHT, g_main_id);
Jeej 0:3058da317f01 98 modem_ready.wait();
Jeej 0:3058da317f01 99
Jeej 0:3058da317f01 100 // Update
Jeej 0:3058da317f01 101 light_level_old = light_level;
Jeej 0:3058da317f01 102 last_report_time = 0;
Jeej 0:3058da317f01 103 }
Jeej 0:3058da317f01 104
Jeej 0:3058da317f01 105 // Update last report time
Jeej 0:3058da317f01 106 last_report_time += g_light_config.read_period;
Jeej 0:3058da317f01 107
Jeej 0:3058da317f01 108 Thread::wait(g_light_config.read_period);
Jeej 0:3058da317f01 109 }
Jeej 0:3058da317f01 110 }
Jeej 0:3058da317f01 111
Jeej 0:3058da317f01 112 void thread_file_modified()
Jeej 0:3058da317f01 113 {
Jeej 0:3058da317f01 114 uint8_t fid;
Jeej 0:3058da317f01 115 osEvent evt;
Jeej 0:3058da317f01 116
Jeej 0:3058da317f01 117 while (true)
Jeej 0:3058da317f01 118 {
Jeej 0:3058da317f01 119 evt = g_file_modified.get();
Jeej 0:3058da317f01 120 fid = (evt.status == osEventMessage)? (uint8_t)(uint32_t)evt.value.p : NULL;
Jeej 0:3058da317f01 121
Jeej 0:3058da317f01 122 switch (fid)
Jeej 0:3058da317f01 123 {
Jeej 0:3058da317f01 124 case FID_SENSOR_CONFIG:
Jeej 0:3058da317f01 125 // Update sensor configuration
Jeej 0:3058da317f01 126 ram_fs_read(FID_SENSOR_CONFIG, 0, SIZE_SENSOR_CONFIG, (uint8_t*)&g_light_config);
Jeej 0:3058da317f01 127 PRINT("Sensor configuration updated\r\n");
Jeej 0:3058da317f01 128 break;
Jeej 0:3058da317f01 129 default:
Jeej 0:3058da317f01 130 break;
Jeej 0:3058da317f01 131 }
Jeej 0:3058da317f01 132 }
Jeej 0:3058da317f01 133 }
Jeej 0:3058da317f01 134
Jeej 0:3058da317f01 135 // Misc
Jeej 0:3058da317f01 136 // ============================================================{{{
Jeej 0:3058da317f01 137
Jeej 0:3058da317f01 138 void my_get_alp_file_props(uint8_t fid, alp_file_header_t* hdr)
Jeej 0:3058da317f01 139 {
Jeej 0:3058da317f01 140 memcpy(hdr, ram_fs_get_header(fid), sizeof(alp_file_header_t));
Jeej 0:3058da317f01 141 }
Jeej 0:3058da317f01 142
Jeej 0:3058da317f01 143 void print_status(int status)
Jeej 0:3058da317f01 144 {
Jeej 0:3058da317f01 145 switch (status)
Jeej 0:3058da317f01 146 {
Jeej 0:3058da317f01 147 case ALP_ERR_NONE:
Jeej 0:3058da317f01 148 PRINT("Status: OK\n");
Jeej 0:3058da317f01 149 break;
Jeej 0:3058da317f01 150 case ALP_ERR_FILE_EXIST:
Jeej 0:3058da317f01 151 PRINT("Status: Already registered\n");
Jeej 0:3058da317f01 152 break;
Jeej 0:3058da317f01 153 default:
Jeej 0:3058da317f01 154 PRINT("Status: error %d\n", status);
Jeej 0:3058da317f01 155 break;
Jeej 0:3058da317f01 156 }
Jeej 0:3058da317f01 157 }
Jeej 0:3058da317f01 158
Jeej 0:3058da317f01 159 void print_resp(int status)
Jeej 0:3058da317f01 160 {
Jeej 0:3058da317f01 161 switch (status)
Jeej 0:3058da317f01 162 {
Jeej 0:3058da317f01 163 case ALP_ERR_NONE:
Jeej 0:3058da317f01 164 PRINT("Resp: OK\n");
Jeej 0:3058da317f01 165 break;
Jeej 0:3058da317f01 166 case ALP_ERR_FILE_EXIST:
Jeej 0:3058da317f01 167 PRINT("Resp: Already registered\n");
Jeej 0:3058da317f01 168 break;
Jeej 0:3058da317f01 169 default:
Jeej 0:3058da317f01 170 PRINT("Resp: error %d\n", status);
Jeej 0:3058da317f01 171 break;
Jeej 0:3058da317f01 172 }
Jeej 0:3058da317f01 173 }
Jeej 0:3058da317f01 174
Jeej 0:3058da317f01 175 // ============================================================}}}
Jeej 0:3058da317f01 176
Jeej 0:3058da317f01 177 // Serial adapters to WizziLab's own architecture
Jeej 0:3058da317f01 178 // ============================================================{{{
Jeej 0:3058da317f01 179
Jeej 0:3058da317f01 180 void my_serial_input(WizziCom* com, WizziComPacket_t* pkt)
Jeej 0:3058da317f01 181 {
Jeej 0:3058da317f01 182 modem_input(wizzicom_type_to_flow(pkt->type), pkt->data, pkt->length);
Jeej 0:3058da317f01 183 FREE(pkt);
Jeej 0:3058da317f01 184 }
Jeej 0:3058da317f01 185
Jeej 0:3058da317f01 186 int my_serial_send(uint8_t* data1, uint8_t size1, uint8_t* data2, uint8_t size2)
Jeej 0:3058da317f01 187 {
Jeej 0:3058da317f01 188 (void)size1;
Jeej 0:3058da317f01 189
Jeej 0:3058da317f01 190 // Retrieve Flow ID from header and send packet
Jeej 0:3058da317f01 191 g_modem_com->send((WizziComPacketType)wizzicom_flow_to_type(data1[4]), size2, data2);
Jeej 0:3058da317f01 192
Jeej 0:3058da317f01 193 return (size1 + size2);
Jeej 0:3058da317f01 194 }
Jeej 0:3058da317f01 195
Jeej 0:3058da317f01 196 modem_callbacks_t callbacks = {
Jeej 0:3058da317f01 197 .read = my_read,
Jeej 0:3058da317f01 198 .write = my_write,
Jeej 0:3058da317f01 199 .read_fprop = my_read_fprop,
Jeej 0:3058da317f01 200 .flush = my_flush,
Jeej 0:3058da317f01 201 .remove = my_delete,
Jeej 0:3058da317f01 202 .lqual = my_lqual,
Jeej 0:3058da317f01 203 .ldown = my_ldown,
Jeej 0:3058da317f01 204 .reset = my_reset,
Jeej 0:3058da317f01 205 .boot = my_boot
Jeej 0:3058da317f01 206 };
Jeej 0:3058da317f01 207
Jeej 0:3058da317f01 208 // Callback for g_main_id User
Jeej 0:3058da317f01 209 void my_main_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 0:3058da317f01 210 {
Jeej 0:3058da317f01 211 (void)id;
Jeej 0:3058da317f01 212
Jeej 0:3058da317f01 213 if (terminal)
Jeej 0:3058da317f01 214 {
Jeej 0:3058da317f01 215 print_status(err);
Jeej 0:3058da317f01 216 modem_ready.release();
Jeej 0:3058da317f01 217 }
Jeej 0:3058da317f01 218 else
Jeej 0:3058da317f01 219 {
Jeej 0:3058da317f01 220 print_resp(err);
Jeej 0:3058da317f01 221 }
Jeej 0:3058da317f01 222 }
Jeej 0:3058da317f01 223
Jeej 0:3058da317f01 224 /*** Main function ------------------------------------------------------------- ***/
Jeej 0:3058da317f01 225 int main()
Jeej 0:3058da317f01 226 {
Jeej 0:3058da317f01 227 // Start & initialize
Jeej 0:3058da317f01 228 DBG_OPEN(DEBUG_LED);
Jeej 0:3058da317f01 229 PRINT("\r\n--- Starting new run ---\r\n");
Jeej 0:3058da317f01 230 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:3058da317f01 231
Jeej 0:3058da317f01 232 alp_file_header_t hdr;
Jeej 0:3058da317f01 233 static union {
Jeej 0:3058da317f01 234 uint8_t b[8];
Jeej 0:3058da317f01 235 uint32_t w[2];
Jeej 0:3058da317f01 236 } uid;
Jeej 0:3058da317f01 237 revision_t rev;
Jeej 0:3058da317f01 238
Jeej 0:3058da317f01 239 // Hardware reset
Jeej 0:3058da317f01 240 DigitalOut reset_low(MODEM_PIN_RESET, 0);
Jeej 0:3058da317f01 241 Thread::wait(100);
Jeej 0:3058da317f01 242
Jeej 0:3058da317f01 243 // Release reset
Jeej 0:3058da317f01 244 DigitalIn reset_release(MODEM_PIN_RESET);
Jeej 0:3058da317f01 245 Thread::wait(1000);
Jeej 0:3058da317f01 246
Jeej 0:3058da317f01 247 // Open modem Com port
Jeej 0:3058da317f01 248 g_modem_com = new WizziCom(MODEM_PIN_TX, MODEM_PIN_RX, MODEM_PIN_IRQ_OUT, MODEM_PIN_IRQ_IN);
Jeej 0:3058da317f01 249
Jeej 0:3058da317f01 250 // Redirect All Port traffic to my_serial_input
Jeej 0:3058da317f01 251 g_modem_com->attach(my_serial_input, WizziComPacketOther);
Jeej 0:3058da317f01 252
Jeej 0:3058da317f01 253 // Open driver
Jeej 0:3058da317f01 254 modem_open(my_serial_send, &callbacks);
Jeej 0:3058da317f01 255
Jeej 0:3058da317f01 256 g_main_id = modem_get_id(my_main_callback);
Jeej 0:3058da317f01 257
Jeej 0:3058da317f01 258 DPRINT("Start Modem Process (id=%d)\n", g_main_id);
Jeej 0:3058da317f01 259 Thread::wait(1000);
Jeej 0:3058da317f01 260
Jeej 0:3058da317f01 261 modem_read_file(0, (uint8_t*)&uid.b[0], 0, 8, g_main_id);
Jeej 0:3058da317f01 262 modem_ready.wait();
Jeej 0:3058da317f01 263
Jeej 0:3058da317f01 264 modem_read_file(2, (uint8_t*)&rev, 0, sizeof(revision_t), g_main_id);
Jeej 0:3058da317f01 265 modem_ready.wait();
Jeej 0:3058da317f01 266
Jeej 0:3058da317f01 267 PRINT("------------ D7A Modem infos ------------\r\n");
Jeej 0:3058da317f01 268 PRINT_DATA(" - UID: ", "%02X", uid.b, 8, "\r\n");
Jeej 0:3058da317f01 269 PRINT(" - Manufacturer ID: %08X\r\n", rev.manufacturer_id);
Jeej 0:3058da317f01 270 PRINT(" - Device ID: %08X\r\n", rev.device_id);
Jeej 0:3058da317f01 271 PRINT(" - Hardware version: %08X\r\n", rev.hw_version);
Jeej 0:3058da317f01 272 PRINT(" - Firmware version: v%d.%d.%d\r\n", rev.fw_version.major, rev.fw_version.minor, rev.fw_version.patch);
Jeej 0:3058da317f01 273 PRINT(" - File system CRC: 0x%08x\r\n", rev.fs_crc);
Jeej 0:3058da317f01 274 PRINT("-----------------------------------------\r\n");
Jeej 0:3058da317f01 275
Jeej 0:3058da317f01 276 //DPRINT("UID: %08X%08X\n", HAL_U32_BYTE_SWAP(uid.w[0]), HAL_U32_BYTE_SWAP(uid.w[1]));
Jeej 0:3058da317f01 277
Jeej 0:3058da317f01 278 DPRINT("Register Files\n");
Jeej 0:3058da317f01 279 // HOST Revision is a local file. Uses D7AActP Notification.
Jeej 0:3058da317f01 280 ram_fs_new(FID_HOST_REV, (uint8_t*)&h_rev, (uint8_t*)&f_rev);
Jeej 0:3058da317f01 281 my_get_alp_file_props(FID_HOST_REV, &hdr);
Jeej 0:3058da317f01 282 modem_declare_file(FID_HOST_REV, &hdr, g_main_id);
Jeej 0:3058da317f01 283 modem_ready.wait();
Jeej 0:3058da317f01 284
Jeej 0:3058da317f01 285 // Create report file on modem.
Jeej 0:3058da317f01 286 modem_delete_file(FID_SENSOR_LIGHT, g_main_id);
Jeej 0:3058da317f01 287 modem_ready.wait();
Jeej 0:3058da317f01 288 ram_fs_new(FID_SENSOR_LIGHT, (uint8_t*)&h_sensor_light, NULL);
Jeej 0:3058da317f01 289 my_get_alp_file_props(FID_SENSOR_LIGHT, &hdr);
Jeej 0:3058da317f01 290 modem_create_file(FID_SENSOR_LIGHT, &hdr, g_main_id);
Jeej 0:3058da317f01 291 modem_ready.wait();
Jeej 0:3058da317f01 292
Jeej 0:3058da317f01 293 // Allow remote access.
Jeej 0:3058da317f01 294 modem_delete_file(FID_SENSOR_CONFIG, g_main_id);
Jeej 0:3058da317f01 295 modem_ready.wait();
Jeej 0:3058da317f01 296 ram_fs_new(FID_SENSOR_CONFIG, (uint8_t*)&h_sensor_config, (uint8_t*)&f_sensor_config);
Jeej 0:3058da317f01 297 my_get_alp_file_props(FID_SENSOR_CONFIG, &hdr);
Jeej 0:3058da317f01 298 modem_declare_file(FID_SENSOR_CONFIG, &hdr, g_main_id);
Jeej 0:3058da317f01 299 modem_ready.wait();
Jeej 0:3058da317f01 300
Jeej 0:3058da317f01 301 // Configure URC: LQUAL on report file notification every 10 reports
Jeej 0:3058da317f01 302 PRINT("Setup URCs\n");
Jeej 0:3058da317f01 303 modem_enable_urc(ALP_URC_TYPE_LQUAL, IFID_REPORT, 10, true, g_main_id);
Jeej 0:3058da317f01 304 modem_ready.wait();
Jeej 0:3058da317f01 305
Jeej 0:3058da317f01 306 PRINT("Start D7A Stack\n");
Jeej 0:3058da317f01 307 modem_activate_itf(ALP_ITF_TYPE_D7A, 24, 0, ALP_D7A_ISTAT_RESP , true, g_main_id);
Jeej 0:3058da317f01 308 modem_ready.wait();
Jeej 0:3058da317f01 309
Jeej 0:3058da317f01 310 PRINT("Notify Modem Version\n");
Jeej 0:3058da317f01 311 modem_notify_file(FID_MODEM_REV, 0, SIZE_HOST_REV, g_main_id);
Jeej 0:3058da317f01 312 modem_ready.wait();
Jeej 0:3058da317f01 313
Jeej 0:3058da317f01 314 PRINT("Notify FW Version\n");
Jeej 0:3058da317f01 315 modem_notify_file(FID_HOST_REV, 0, SIZE_HOST_REV, g_main_id);
Jeej 0:3058da317f01 316 modem_ready.wait();
Jeej 0:3058da317f01 317
Jeej 0:3058da317f01 318 // Start file modified thread
Jeej 0:3058da317f01 319 Thread th_file_modified(osPriorityNormal, 1024, NULL);
Jeej 0:3058da317f01 320 osStatus status = th_file_modified.start(thread_file_modified);
Jeej 0:3058da317f01 321 ASSERT(status == osOK, "Failed to start thread_file_modified (err: %d)\r\n", status);
Jeej 0:3058da317f01 322
Jeej 0:3058da317f01 323 // Start light measure thread
Jeej 0:3058da317f01 324 Thread th_sensor_light(osPriorityNormal, 1024, NULL);
Jeej 0:3058da317f01 325 status = th_sensor_light.start(thread_sensor_light);
Jeej 0:3058da317f01 326 ASSERT(status == osOK, "Failed to start thread_sensor_light (err: %d)\r\n", status);
Jeej 0:3058da317f01 327
Jeej 0:3058da317f01 328 #ifdef DEBUG_LED
Jeej 0:3058da317f01 329 DigitalOut my_led(DEBUG_LED);
Jeej 0:3058da317f01 330 #endif
Jeej 0:3058da317f01 331
Jeej 0:3058da317f01 332 // Set main task to lowest priority
Jeej 0:3058da317f01 333 osThreadSetPriority(osThreadGetId(), osPriorityIdle);
Jeej 0:3058da317f01 334 while(true)
Jeej 0:3058da317f01 335 {
Jeej 0:3058da317f01 336 Thread::wait(500);
Jeej 0:3058da317f01 337 #ifdef DEBUG_LED
Jeej 0:3058da317f01 338 my_led = !my_led;
Jeej 0:3058da317f01 339 #endif
Jeej 0:3058da317f01 340 }
Jeej 0:3058da317f01 341 }