Send file data demo.

Dependencies:   modem_ref_helper CRC DebouncedInterrupt

Committer:
Jeej
Date:
Thu Oct 11 10:15:04 2018 +0000
Revision:
15:4db98a56f7c1
Parent:
14:788c749cabed
Child:
16:355dcd95c082
v1.0.2 Updated API.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Jeej 0:065f2318fcb9 1 // @autor: jeremie@wizzilab.com
Jeej 0:065f2318fcb9 2 // @date: 2017-05-02
Jeej 0:065f2318fcb9 3
Jeej 0:065f2318fcb9 4 #include "DebouncedInterrupt.h"
Jeej 6:05e26c3a495a 5 #include "modem_ref_helper.h"
Jeej 6:05e26c3a495a 6 #include "modem_callbacks.h"
Jeej 0:065f2318fcb9 7 #include "files.h"
Jeej 0:065f2318fcb9 8
Jeej 0:065f2318fcb9 9
Jeej 0:065f2318fcb9 10 Semaphore button_user(0);
Jeej 0:065f2318fcb9 11 Semaphore modem_ready(0);
Jeej 11:41be2acd7541 12 Semaphore user_ready(0);
Jeej 3:3811610b75cd 13 Queue<void, 8> modem_resp;
Jeej 0:065f2318fcb9 14
Jeej 14:788c749cabed 15 uint8_t id, g_report_id;
Jeej 0:065f2318fcb9 16
Jeej 3:3811610b75cd 17 enum {
Jeej 3:3811610b75cd 18 MODEM_RESP_NO,
Jeej 3:3811610b75cd 19 MODEM_RESP_TERMINAL,
Jeej 11:41be2acd7541 20 MODEM_RESP_ERROR,
Jeej 11:41be2acd7541 21 MODEM_RESP_ACK,
Jeej 11:41be2acd7541 22 MODEM_RESP_TIMEOUT,
Jeej 3:3811610b75cd 23 };
Jeej 3:3811610b75cd 24
Jeej 0:065f2318fcb9 25 alp_d7a_itf_t alarm_itf = {
Jeej 0:065f2318fcb9 26 .type = ALP_ITF_TYPE_D7A,
Jeej 0:065f2318fcb9 27 .cfg.to = 0,
Jeej 0:065f2318fcb9 28 .cfg.te = 0,
Jeej 7:c34074bfef49 29 .cfg.qos.bf.resp = D7A_RESP_ALL,
Jeej 15:4db98a56f7c1 30 .cfg.qos.bf.retry = ALP_RPOL_ONESHOT,
Jeej 0:065f2318fcb9 31 .cfg.addressee.ctrl.bf.nls = D7A_NLS_AES_CCM_64,
Jeej 0:065f2318fcb9 32 .cfg.addressee.ctrl.bf.idf = D7A_ID_NBID,
Jeej 15:4db98a56f7c1 33 .cfg.addressee.xcl.bf = {.s = 2, .m = 0x1},// XXX D7A_XCL_GW,
Jeej 15:4db98a56f7c1 34 .cfg.addressee.id[0] = D7A_CTF_ENCODE(8),
Jeej 0:065f2318fcb9 35 };
Jeej 0:065f2318fcb9 36
Jeej 0:065f2318fcb9 37 // Interrupt Service Routine on button press.
Jeej 0:065f2318fcb9 38 void button_push_isr( void )
Jeej 0:065f2318fcb9 39 {
Jeej 0:065f2318fcb9 40 button_user.release();
Jeej 0:065f2318fcb9 41 }
Jeej 0:065f2318fcb9 42
Jeej 14:788c749cabed 43 void print_status(uint8_t id, int status)
Jeej 14:788c749cabed 44 {
Jeej 14:788c749cabed 45 switch (status)
Jeej 14:788c749cabed 46 {
Jeej 14:788c749cabed 47 case ALP_ERR_NONE:
Jeej 14:788c749cabed 48 PRINT("Status[%d]: OK\n", id);
Jeej 14:788c749cabed 49 break;
Jeej 14:788c749cabed 50 default:
Jeej 14:788c749cabed 51 PRINT("Status[%d]: error %d\n", id, status);
Jeej 14:788c749cabed 52 break;
Jeej 14:788c749cabed 53 }
Jeej 14:788c749cabed 54 }
Jeej 14:788c749cabed 55
Jeej 14:788c749cabed 56 // Main Callback
Jeej 14:788c749cabed 57 void my_main_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 15:4db98a56f7c1 58 {
Jeej 15:4db98a56f7c1 59 if (ALP_ERR_NONE != err)
Jeej 15:4db98a56f7c1 60 {
Jeej 15:4db98a56f7c1 61 modem_print_error(ALP_ITF_TYPE_D7A, err);
Jeej 15:4db98a56f7c1 62 }
Jeej 14:788c749cabed 63
Jeej 14:788c749cabed 64 if (terminal)
Jeej 14:788c749cabed 65 {
Jeej 14:788c749cabed 66 modem_ready.release();
Jeej 14:788c749cabed 67 }
Jeej 14:788c749cabed 68 }
Jeej 14:788c749cabed 69
Jeej 11:41be2acd7541 70 // Response Callback
Jeej 3:3811610b75cd 71 void my_response_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 3:3811610b75cd 72 {
Jeej 3:3811610b75cd 73 (void)id;
Jeej 3:3811610b75cd 74
Jeej 15:4db98a56f7c1 75 if (ALP_ERR_NONE != err)
Jeej 15:4db98a56f7c1 76 {
Jeej 15:4db98a56f7c1 77 modem_print_error(ALP_ITF_TYPE_D7A, err);
Jeej 15:4db98a56f7c1 78 }
Jeej 15:4db98a56f7c1 79
Jeej 3:3811610b75cd 80 if (terminal)
Jeej 11:41be2acd7541 81 {
Jeej 3:3811610b75cd 82 modem_resp.put((void*)MODEM_RESP_TERMINAL);
Jeej 3:3811610b75cd 83 }
Jeej 3:3811610b75cd 84 else
Jeej 3:3811610b75cd 85 {
Jeej 3:3811610b75cd 86 if (ALP_ERR_NONE == err)
Jeej 3:3811610b75cd 87 {
Jeej 11:41be2acd7541 88 modem_resp.put((void*)MODEM_RESP_ACK);
Jeej 11:41be2acd7541 89 }
Jeej 11:41be2acd7541 90 else
Jeej 11:41be2acd7541 91 {
Jeej 11:41be2acd7541 92 modem_resp.put((void*)MODEM_RESP_ERROR);
Jeej 3:3811610b75cd 93 }
Jeej 3:3811610b75cd 94 }
Jeej 11:41be2acd7541 95
Jeej 11:41be2acd7541 96 // Wait end of user processing before resuming
Jeej 11:41be2acd7541 97 user_ready.wait();
Jeej 3:3811610b75cd 98 }
Jeej 3:3811610b75cd 99
Jeej 0:065f2318fcb9 100 void button_user_thread()
Jeej 0:065f2318fcb9 101 {
Jeej 3:3811610b75cd 102 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:065f2318fcb9 103
Jeej 3:3811610b75cd 104 osEvent evt;
Jeej 3:3811610b75cd 105 uint32_t resp;
Jeej 3:3811610b75cd 106 uint8_t alarm;
Jeej 14:788c749cabed 107 uint8_t id = modem_get_id(my_main_callback);
Jeej 3:3811610b75cd 108 d7a_sp_res_t istat;
Jeej 3:3811610b75cd 109 uint8_t nb = 0;
Jeej 0:065f2318fcb9 110
Jeej 4:999305b576c0 111 memset(&istat, 0, sizeof(d7a_sp_res_t));
Jeej 4:999305b576c0 112
Jeej 0:065f2318fcb9 113 // Load alarm value
Jeej 1:f4a7a48a5f2b 114 ram_fs_read(FID_ALARM, 0, 1, &alarm);
Jeej 0:065f2318fcb9 115
Jeej 0:065f2318fcb9 116 // Send initial value
Jeej 14:788c749cabed 117 modem_send_file_content((uint8_t*)&alarm_itf, D7_ITF_SIZE(&alarm_itf), (void*)&istat, FID_ALARM, &alarm, 0, 1, id);
Jeej 0:065f2318fcb9 118 modem_ready.wait();
Jeej 0:065f2318fcb9 119
Jeej 14:788c749cabed 120 // Change callback
Jeej 14:788c749cabed 121 modem_free_id(id);
Jeej 14:788c749cabed 122 id = modem_get_id(my_response_callback);
Jeej 14:788c749cabed 123
Jeej 0:065f2318fcb9 124 while (true)
Jeej 0:065f2318fcb9 125 {
Jeej 0:065f2318fcb9 126 // Wait for button press
Jeej 8:db5679d113c2 127 PRINT("PRESS BUTTON TO SEND ALARM...\r\n");
Jeej 0:065f2318fcb9 128 button_user.wait();
Jeej 0:065f2318fcb9 129
Jeej 6:05e26c3a495a 130 nb = 0;
Jeej 6:05e26c3a495a 131
Jeej 0:065f2318fcb9 132 // load/save value to keep choerency in case of remote access...
Jeej 1:f4a7a48a5f2b 133 ram_fs_read(FID_ALARM, 0, 1, &alarm);
Jeej 0:065f2318fcb9 134
Jeej 0:065f2318fcb9 135 // Toggle alarm state
Jeej 0:065f2318fcb9 136 alarm = !alarm;
Jeej 0:065f2318fcb9 137
Jeej 1:f4a7a48a5f2b 138 ram_fs_write(FID_ALARM, 0, 1, &alarm);
Jeej 0:065f2318fcb9 139
Jeej 0:065f2318fcb9 140 PRINT("BUTTON ALARM %d\r\n", alarm);
Jeej 11:41be2acd7541 141
Jeej 11:41be2acd7541 142 // Send data
Jeej 14:788c749cabed 143 modem_send_file_content((uint8_t*)&alarm_itf, D7_ITF_SIZE(&alarm_itf), (void*)&istat, FID_ALARM, &alarm, 0, 1, id);
Jeej 3:3811610b75cd 144
Jeej 3:3811610b75cd 145 do
Jeej 3:3811610b75cd 146 {
Jeej 11:41be2acd7541 147 // Wait for callback
Jeej 11:41be2acd7541 148 evt = modem_resp.get(3000);
Jeej 11:41be2acd7541 149 resp = (evt.status == osEventMessage)? (uint32_t)evt.value.p : MODEM_RESP_TIMEOUT;
Jeej 11:41be2acd7541 150
Jeej 11:41be2acd7541 151 if (MODEM_RESP_ACK == resp)
Jeej 11:41be2acd7541 152 {
Jeej 11:41be2acd7541 153 // Print metadata
Jeej 11:41be2acd7541 154 PRINT("ACK %d: ", ++nb);
Jeej 14:788c749cabed 155 PRINT_DATA("UID:", "%02X", istat.addressee.id, 8, " ");
Jeej 11:41be2acd7541 156 PRINT("SNR: %ddB RXLEV: %ddBm LB: %ddB\n", istat.snr, -istat.rxlev, istat.lb);
Jeej 11:41be2acd7541 157
Jeej 11:41be2acd7541 158 // Clear istatus buffer
Jeej 11:41be2acd7541 159 memset(&istat, 0, sizeof(d7a_sp_res_t));
Jeej 11:41be2acd7541 160
Jeej 11:41be2acd7541 161 // Resume processing
Jeej 11:41be2acd7541 162 user_ready.release();
Jeej 11:41be2acd7541 163 }
Jeej 11:41be2acd7541 164 else if (MODEM_RESP_TIMEOUT == resp)
Jeej 7:c34074bfef49 165 {
Jeej 11:41be2acd7541 166 // Could be because of the RF duty cycle,
Jeej 11:41be2acd7541 167 // especialy after boot where the duty credit is near 0.
Jeej 14:788c749cabed 168 // The only thing to do is wait.
Jeej 14:788c749cabed 169 // The transmission will resume once some duty credit is available.
Jeej 11:41be2acd7541 170 PRINT("WAITING...\n");
Jeej 11:41be2acd7541 171 }
Jeej 11:41be2acd7541 172 else if (MODEM_RESP_ERROR == resp)
Jeej 11:41be2acd7541 173 {
Jeej 11:41be2acd7541 174 PRINT("ERROR.\n");
Jeej 7:c34074bfef49 175
Jeej 11:41be2acd7541 176 // Resume processing
Jeej 11:41be2acd7541 177 user_ready.release();
Jeej 7:c34074bfef49 178 }
Jeej 11:41be2acd7541 179 else if (MODEM_RESP_TERMINAL == resp)
Jeej 11:41be2acd7541 180 {
Jeej 11:41be2acd7541 181 PRINT("DONE.\n");
Jeej 11:41be2acd7541 182
Jeej 11:41be2acd7541 183 // Resume processing
Jeej 11:41be2acd7541 184 user_ready.release();
Jeej 11:41be2acd7541 185 }
Jeej 14:788c749cabed 186
Jeej 3:3811610b75cd 187 } while (MODEM_RESP_TERMINAL != resp);
Jeej 3:3811610b75cd 188
Jeej 3:3811610b75cd 189 PRINT("BUTTON ALARM DONE\r\n");
Jeej 0:065f2318fcb9 190 }
Jeej 0:065f2318fcb9 191 }
Jeej 0:065f2318fcb9 192
Jeej 0:065f2318fcb9 193 // Misc
Jeej 0:065f2318fcb9 194 // ============================================================{{{
Jeej 0:065f2318fcb9 195
Jeej 0:065f2318fcb9 196 void my_get_alp_file_props(uint8_t fid, alp_file_header_t* hdr)
Jeej 0:065f2318fcb9 197 {
Jeej 1:f4a7a48a5f2b 198 memcpy(hdr, ram_fs_get_header(fid), sizeof(alp_file_header_t));
Jeej 0:065f2318fcb9 199 }
Jeej 0:065f2318fcb9 200
Jeej 0:065f2318fcb9 201 modem_callbacks_t callbacks = {
Jeej 0:065f2318fcb9 202 .read = my_read,
Jeej 0:065f2318fcb9 203 .write = my_write,
Jeej 0:065f2318fcb9 204 .read_fprop = my_read_fprop,
Jeej 0:065f2318fcb9 205 .flush = my_flush,
Jeej 0:065f2318fcb9 206 .remove = my_delete,
Jeej 6:05e26c3a495a 207 .udata = my_udata,
Jeej 0:065f2318fcb9 208 .lqual = my_lqual,
Jeej 0:065f2318fcb9 209 .ldown = my_ldown,
Jeej 0:065f2318fcb9 210 .reset = my_reset,
Jeej 14:788c749cabed 211 .boot = my_boot,
Jeej 14:788c749cabed 212 .busy = my_busy,
Jeej 0:065f2318fcb9 213 };
Jeej 0:065f2318fcb9 214
Jeej 3:3811610b75cd 215
Jeej 0:065f2318fcb9 216 /*** Main function ------------------------------------------------------------- ***/
Jeej 0:065f2318fcb9 217 int main()
Jeej 0:065f2318fcb9 218 {
Jeej 0:065f2318fcb9 219 // Start & initialize
Jeej 6:05e26c3a495a 220 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 221 DBG_OPEN(DEBUG_LED);
Jeej 6:05e26c3a495a 222 #else
Jeej 6:05e26c3a495a 223 DBG_OPEN(NC);
Jeej 6:05e26c3a495a 224 #endif
Jeej 8:db5679d113c2 225 PRINT("\n"
Jeej 8:db5679d113c2 226 "-----------------------------------------\n"
Jeej 8:db5679d113c2 227 "---------- Demo Send file data ----------\n"
Jeej 8:db5679d113c2 228 "-----------------------------------------\n");
Jeej 8:db5679d113c2 229
Jeej 0:065f2318fcb9 230 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:065f2318fcb9 231
Jeej 6:05e26c3a495a 232 modem_helper_open(&callbacks);
Jeej 0:065f2318fcb9 233
Jeej 14:788c749cabed 234 uint8_t id = modem_get_id(my_main_callback);
Jeej 1:f4a7a48a5f2b 235
Jeej 5:ee132af18614 236 PRINT("Register Files\n");
Jeej 0:065f2318fcb9 237 // Button/Alarm is a local file. As we want to check the outcome of sending
Jeej 0:065f2318fcb9 238 // this, don't use D7AActP Notification but rather plain ALP ITF Forwarding.
Jeej 0:065f2318fcb9 239 // Declaration just allows remote access.
Jeej 3:3811610b75cd 240 modem_update_file(FID_ALARM, (alp_file_header_t*)&h_alarm, (uint8_t*)&f_alarm);
Jeej 0:065f2318fcb9 241
Jeej 0:065f2318fcb9 242 // Configure URC: LQUAL on report file notification every 10 reports
Jeej 1:f4a7a48a5f2b 243 PRINT("Setup URCs\n");
Jeej 14:788c749cabed 244 modem_enable_urc(ALP_URC_TYPE_LQUAL, IFID_REPORT, 10, true, id);
Jeej 0:065f2318fcb9 245 modem_ready.wait();
Jeej 0:065f2318fcb9 246
Jeej 1:f4a7a48a5f2b 247 PRINT("Start D7A Stack\n");
Jeej 15:4db98a56f7c1 248 modem_activate_itf(ALP_ITF_TYPE_D7A, 24, 0, ALP_D7A_ISTAT_RESP | ALP_D7A_ISTAT_UNS | ALP_D7A_ISTAT_EOP, true, id);
Jeej 1:f4a7a48a5f2b 249 modem_ready.wait();
Jeej 1:f4a7a48a5f2b 250
Jeej 1:f4a7a48a5f2b 251 PRINT("Notify Modem Version\n");
Jeej 14:788c749cabed 252 modem_notify_file(D7A_FID_FIRMWARE_VERSION, 0, SIZE_HOST_REV, id);
Jeej 1:f4a7a48a5f2b 253 modem_ready.wait();
Jeej 1:f4a7a48a5f2b 254
Jeej 1:f4a7a48a5f2b 255 PRINT("Notify FW Version\n");
Jeej 15:4db98a56f7c1 256 uint8_t default_root_key[16] = DEFAULT_ROOT_KEY;
Jeej 15:4db98a56f7c1 257 modem_notify_host_rev(&f_rev, &h_rev, default_root_key);
Jeej 14:788c749cabed 258
Jeej 14:788c749cabed 259 modem_free_id(id);
Jeej 0:065f2318fcb9 260
Jeej 0:065f2318fcb9 261 #ifdef DEBUG_BUTTON
Jeej 0:065f2318fcb9 262 DebouncedInterrupt user_interrupt(DEBUG_BUTTON);
Jeej 0:065f2318fcb9 263 user_interrupt.attach(button_push_isr, IRQ_FALL, 500, true);
Jeej 0:065f2318fcb9 264
Jeej 0:065f2318fcb9 265 Thread but_th(osPriorityNormal, 2048, NULL);
Jeej 0:065f2318fcb9 266 osStatus status = but_th.start(button_user_thread);
Jeej 0:065f2318fcb9 267 ASSERT(status == osOK, "Failed to start but thread (err: %d)\r\n", status);
Jeej 0:065f2318fcb9 268 #endif
Jeej 0:065f2318fcb9 269
Jeej 6:05e26c3a495a 270 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 271 DigitalOut my_led(DEBUG_LED);
Jeej 0:065f2318fcb9 272 #endif
Jeej 0:065f2318fcb9 273
Jeej 0:065f2318fcb9 274 // Set main task to lowest priority
Jeej 0:065f2318fcb9 275 osThreadSetPriority(osThreadGetId(), osPriorityIdle);
Jeej 0:065f2318fcb9 276 while(true)
Jeej 0:065f2318fcb9 277 {
Jeej 1:f4a7a48a5f2b 278 Thread::wait(500);
Jeej 6:05e26c3a495a 279 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 280 my_led = !my_led;
Jeej 0:065f2318fcb9 281 #endif
Jeej 0:065f2318fcb9 282 }
Jeej 0:065f2318fcb9 283 }