Send file data demo.

Dependencies:   modem_ref_helper CRC DebouncedInterrupt

Committer:
Jeej
Date:
Thu Sep 20 12:26:16 2018 +0000
Revision:
14:788c749cabed
Parent:
13:43bcbb6fc446
Child:
15:4db98a56f7c1
Updated libraries and APP for modem v5.2+

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