WizziLab / Mbed OS D7A_1x_demo_send_file_data Featured

Send file data demo.

Dependencies:   modem_ref_helper CRC DebouncedInterrupt

main.cpp@20:5856f9bfd8e3, 2021-10-29 (annotated)

Committer:
marin_wizzi
Date:
Fri Oct 29 13:11:38 2021 +0000
Revision:
20:5856f9bfd8e3
Parent:
19:68f3a84dbc8f 
Compatible with 6.2 modem version

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"
marin_wizzi 20:5856f9bfd8e3 5 #include "modem_d7a.h"
Jeej 6:05e26c3a495a 6 #include "modem_callbacks.h"
Jeej 0:065f2318fcb9 7 #include "files.h"
marin_wizzi 20:5856f9bfd8e3 8 #include "crc.h"
Jeej 0:065f2318fcb9 9
Jeej 0:065f2318fcb9 10
Jeej 0:065f2318fcb9 11 Semaphore button_user(0);
Jeej 0:065f2318fcb9 12 Semaphore modem_ready(0);
Jeej 11:41be2acd7541 13 Semaphore user_ready(0);
marin_wizzi 20:5856f9bfd8e3 14 Queue<touch_t, 8> modem_resp;
Jeej 0:065f2318fcb9 15
Jeej 14:788c749cabed 16 uint8_t id, g_report_id;
Jeej 0:065f2318fcb9 17
Jeej 3:3811610b75cd 18 enum {
Jeej 3:3811610b75cd 19 MODEM_RESP_NO,
Jeej 3:3811610b75cd 20 MODEM_RESP_TERMINAL,
Jeej 11:41be2acd7541 21 MODEM_RESP_ERROR,
Jeej 11:41be2acd7541 22 MODEM_RESP_ACK,
Jeej 11:41be2acd7541 23 MODEM_RESP_TIMEOUT,
Jeej 3:3811610b75cd 24 };
Jeej 3:3811610b75cd 25
Jeej 0:065f2318fcb9 26 alp_d7a_itf_t alarm_itf = {
Jeej 0:065f2318fcb9 27 .type = ALP_ITF_TYPE_D7A,
Jeej 19:68f3a84dbc8f 28 .cfg.to.byte = D7A_CTF_ENCODE(0),
Jeej 19:68f3a84dbc8f 29 .cfg.te.byte = D7A_CTF_ENCODE(0),
Jeej 7:c34074bfef49 30 .cfg.qos.bf.resp = D7A_RESP_ALL,
Jeej 15:4db98a56f7c1 31 .cfg.qos.bf.retry = ALP_RPOL_ONESHOT,
Jeej 0:065f2318fcb9 32 .cfg.addressee.ctrl.bf.nls = D7A_NLS_AES_CCM_64,
Jeej 0:065f2318fcb9 33 .cfg.addressee.ctrl.bf.idf = D7A_ID_NBID,
Jeej 15:4db98a56f7c1 34 .cfg.addressee.xcl.bf = {.s = 2, .m = 0x1},// XXX D7A_XCL_GW,
Jeej 15:4db98a56f7c1 35 .cfg.addressee.id[0] = D7A_CTF_ENCODE(8),
Jeej 0:065f2318fcb9 36 };
Jeej 0:065f2318fcb9 37
Jeej 0:065f2318fcb9 38 // Interrupt Service Routine on button press.
Jeej 0:065f2318fcb9 39 void button_push_isr( void )
Jeej 0:065f2318fcb9 40 {
Jeej 0:065f2318fcb9 41 button_user.release();
Jeej 0:065f2318fcb9 42 }
Jeej 0:065f2318fcb9 43
Jeej 14:788c749cabed 44 // Main Callback
Jeej 14:788c749cabed 45 void my_main_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 15:4db98a56f7c1 46 {
Jeej 19:68f3a84dbc8f 47 if (ALP_ERR_NONE > err)
Jeej 15:4db98a56f7c1 48 {
Jeej 15:4db98a56f7c1 49 modem_print_error(ALP_ITF_TYPE_D7A, err);
Jeej 15:4db98a56f7c1 50 }
Jeej 14:788c749cabed 51
Jeej 14:788c749cabed 52 if (terminal)
Jeej 14:788c749cabed 53 {
Jeej 14:788c749cabed 54 modem_ready.release();
Jeej 14:788c749cabed 55 }
Jeej 14:788c749cabed 56 }
Jeej 14:788c749cabed 57
Jeej 11:41be2acd7541 58 // Response Callback
Jeej 3:3811610b75cd 59 void my_response_callback(uint8_t terminal, int8_t err, uint8_t id)
Jeej 3:3811610b75cd 60 {
Jeej 3:3811610b75cd 61 (void)id;
Jeej 3:3811610b75cd 62
Jeej 19:68f3a84dbc8f 63 if (ALP_ERR_NONE > err)
Jeej 15:4db98a56f7c1 64 {
Jeej 15:4db98a56f7c1 65 modem_print_error(ALP_ITF_TYPE_D7A, err);
Jeej 15:4db98a56f7c1 66 }
Jeej 15:4db98a56f7c1 67
Jeej 3:3811610b75cd 68 if (terminal)
Jeej 11:41be2acd7541 69 {
marin_wizzi 20:5856f9bfd8e3 70 modem_resp.put((touch_t*)MODEM_RESP_TERMINAL);
Jeej 3:3811610b75cd 71 }
Jeej 3:3811610b75cd 72 else
Jeej 3:3811610b75cd 73 {
Jeej 3:3811610b75cd 74 if (ALP_ERR_NONE == err)
Jeej 3:3811610b75cd 75 {
marin_wizzi 20:5856f9bfd8e3 76 modem_resp.put((touch_t*)MODEM_RESP_ACK);
Jeej 11:41be2acd7541 77 }
Jeej 19:68f3a84dbc8f 78 else if (ALP_ERR_NONE > err)
Jeej 19:68f3a84dbc8f 79 {
marin_wizzi 20:5856f9bfd8e3 80 modem_resp.put((touch_t*)MODEM_RESP_ERROR);
Jeej 19:68f3a84dbc8f 81 }
Jeej 11:41be2acd7541 82 else
Jeej 11:41be2acd7541 83 {
Jeej 19:68f3a84dbc8f 84 return;
Jeej 3:3811610b75cd 85 }
Jeej 3:3811610b75cd 86 }
Jeej 11:41be2acd7541 87
Jeej 11:41be2acd7541 88 // Wait end of user processing before resuming
Jeej 17:d50191689d1f 89 user_ready.acquire();
Jeej 3:3811610b75cd 90 }
Jeej 3:3811610b75cd 91
Jeej 0:065f2318fcb9 92 void button_user_thread()
Jeej 0:065f2318fcb9 93 {
marin_wizzi 20:5856f9bfd8e3 94 touch_t* touch;
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;
marin_wizzi 20:5856f9bfd8e3 100 uint8_t id = modem_ref_get_id(my_main_callback);
Jeej 3:3811610b75cd 101 d7a_sp_res_t istat;
marin_wizzi 20:5856f9bfd8e3 102 alp_payload_t* alp;
marin_wizzi 20:5856f9bfd8e3 103 alp_payload_t* alp_rsp;
Jeej 3:3811610b75cd 104 uint8_t nb = 0;
marin_wizzi 20:5856f9bfd8e3 105 int err;
Jeej 0:065f2318fcb9 106
Jeej 4:999305b576c0 107 memset(&istat, 0, sizeof(d7a_sp_res_t));
Jeej 4:999305b576c0 108
Jeej 0:065f2318fcb9 109 // Load alarm value
marin_wizzi 20:5856f9bfd8e3 110 ram_fs_read(FID_ALARM, &alarm, 0, 1);
Jeej 0:065f2318fcb9 111
Jeej 14:788c749cabed 112
Jeej 0:065f2318fcb9 113 while (true)
Jeej 0:065f2318fcb9 114 {
marin_wizzi 20:5856f9bfd8e3 115
Jeej 0:065f2318fcb9 116 // Wait for button press
Jeej 8:db5679d113c2 117 PRINT("PRESS BUTTON TO SEND ALARM...\r\n");
Jeej 17:d50191689d1f 118 button_user.acquire();
Jeej 0:065f2318fcb9 119
marin_wizzi 20:5856f9bfd8e3 120
marin_wizzi 20:5856f9bfd8e3 121
Jeej 6:05e26c3a495a 122 nb = 0;
Jeej 6:05e26c3a495a 123
Jeej 0:065f2318fcb9 124 // load/save value to keep choerency in case of remote access...
marin_wizzi 20:5856f9bfd8e3 125 ram_fs_read(FID_ALARM, &alarm, 0, 1);
Jeej 0:065f2318fcb9 126
Jeej 0:065f2318fcb9 127 // Toggle alarm state
Jeej 0:065f2318fcb9 128 alarm = !alarm;
Jeej 0:065f2318fcb9 129
marin_wizzi 20:5856f9bfd8e3 130 ram_fs_write(FID_ALARM, &alarm, 0, 1);
Jeej 0:065f2318fcb9 131
Jeej 0:065f2318fcb9 132 PRINT("BUTTON ALARM %d\r\n", alarm);
Jeej 11:41be2acd7541 133
marin_wizzi 20:5856f9bfd8e3 134 alp = NULL;
marin_wizzi 20:5856f9bfd8e3 135 alp = alp_payload_rsp_f_data(alp, FID_ALARM, &alarm, 0, 1);
marin_wizzi 20:5856f9bfd8e3 136
marin_wizzi 20:5856f9bfd8e3 137 err = modem_remote_raw_alp((void*)&alarm_itf, alp, &alp_rsp, (uint32_t)15000);
Jeej 3:3811610b75cd 138
marin_wizzi 20:5856f9bfd8e3 139 if (err < ALP_ERR_NONE)
marin_wizzi 20:5856f9bfd8e3 140 {
marin_wizzi 20:5856f9bfd8e3 141 PRINT("Timeout.\n");
marin_wizzi 20:5856f9bfd8e3 142 }
marin_wizzi 20:5856f9bfd8e3 143 else
Jeej 3:3811610b75cd 144 {
marin_wizzi 20:5856f9bfd8e3 145 err = alp_payload_get_err(alp_rsp);
marin_wizzi 20:5856f9bfd8e3 146 PRINT("err %d\n", err);
marin_wizzi 20:5856f9bfd8e3 147 modem_print_error(alarm_itf.type, err);
marin_wizzi 20:5856f9bfd8e3 148 }
Jeej 11:41be2acd7541 149
marin_wizzi 20:5856f9bfd8e3 150 do {
marin_wizzi 20:5856f9bfd8e3 151 nb++;
marin_wizzi 20:5856f9bfd8e3 152
marin_wizzi 20:5856f9bfd8e3 153 alp = alp_payload_extract(&alp_rsp, ALP_OPCODE_RSP_ISTATUS);
marin_wizzi 20:5856f9bfd8e3 154
marin_wizzi 20:5856f9bfd8e3 155 if (alp)
Jeej 7:c34074bfef49 156 {
marin_wizzi 20:5856f9bfd8e3 157 alp_parsed_chunk_t r;
marin_wizzi 20:5856f9bfd8e3 158 u8* p = alp->d;
marin_wizzi 20:5856f9bfd8e3 159
marin_wizzi 20:5856f9bfd8e3 160 alp_parse_chunk(&p, &r);
marin_wizzi 20:5856f9bfd8e3 161 memcpy(&istat, r.data, r.meta.itf.length);
marin_wizzi 20:5856f9bfd8e3 162
marin_wizzi 20:5856f9bfd8e3 163 // Print metadata
marin_wizzi 20:5856f9bfd8e3 164 PRINT("ACK %d: ", nb);
marin_wizzi 20:5856f9bfd8e3 165 PRINT_DATA("UID:", "%02X", istat.addressee.id, 8, " ");
marin_wizzi 20:5856f9bfd8e3 166 PRINT("snr:%d rxlev:%d lb:%d \n", istat.snr, -istat.rxlev, istat.lb);
marin_wizzi 20:5856f9bfd8e3 167
marin_wizzi 20:5856f9bfd8e3 168 alp_payload_free(alp);
Jeej 7:c34074bfef49 169 }
marin_wizzi 20:5856f9bfd8e3 170 else
Jeej 11:41be2acd7541 171 {
marin_wizzi 20:5856f9bfd8e3 172 break;
Jeej 11:41be2acd7541 173 }
marin_wizzi 20:5856f9bfd8e3 174
marin_wizzi 20:5856f9bfd8e3 175 FLUSH();
marin_wizzi 20:5856f9bfd8e3 176 } while (1);
marin_wizzi 20:5856f9bfd8e3 177 PRINT("Done.\n");
marin_wizzi 20:5856f9bfd8e3 178 }
marin_wizzi 20:5856f9bfd8e3 179 }
Jeej 14:788c749cabed 180
Jeej 0:065f2318fcb9 181
Jeej 0:065f2318fcb9 182 // Misc
Jeej 0:065f2318fcb9 183 // ============================================================{{{
Jeej 0:065f2318fcb9 184
Jeej 0:065f2318fcb9 185 void my_get_alp_file_props(uint8_t fid, alp_file_header_t* hdr)
Jeej 0:065f2318fcb9 186 {
Jeej 1:f4a7a48a5f2b 187 memcpy(hdr, ram_fs_get_header(fid), sizeof(alp_file_header_t));
Jeej 0:065f2318fcb9 188 }
Jeej 0:065f2318fcb9 189
marin_wizzi 20:5856f9bfd8e3 190 modem_ref_callbacks_t callbacks = {
Jeej 0:065f2318fcb9 191 .read = my_read,
Jeej 0:065f2318fcb9 192 .write = my_write,
Jeej 0:065f2318fcb9 193 .read_fprop = my_read_fprop,
Jeej 0:065f2318fcb9 194 .flush = my_flush,
Jeej 0:065f2318fcb9 195 .remove = my_delete,
Jeej 6:05e26c3a495a 196 .udata = my_udata,
Jeej 0:065f2318fcb9 197 .lqual = my_lqual,
Jeej 0:065f2318fcb9 198 .ldown = my_ldown,
Jeej 0:065f2318fcb9 199 .reset = my_reset,
Jeej 14:788c749cabed 200 .boot = my_boot,
Jeej 14:788c749cabed 201 .busy = my_busy,
Jeej 0:065f2318fcb9 202 };
Jeej 0:065f2318fcb9 203
Jeej 3:3811610b75cd 204
Jeej 0:065f2318fcb9 205 /*** Main function ------------------------------------------------------------- ***/
Jeej 0:065f2318fcb9 206 int main()
Jeej 0:065f2318fcb9 207 {
Jeej 0:065f2318fcb9 208 // Start & initialize
Jeej 6:05e26c3a495a 209 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 210 DBG_OPEN(DEBUG_LED);
Jeej 6:05e26c3a495a 211 #else
Jeej 6:05e26c3a495a 212 DBG_OPEN(NC);
Jeej 6:05e26c3a495a 213 #endif
Jeej 8:db5679d113c2 214 PRINT("\n"
Jeej 8:db5679d113c2 215 "-----------------------------------------\n"
Jeej 8:db5679d113c2 216 "---------- Demo Send file data ----------\n"
Jeej 8:db5679d113c2 217 "-----------------------------------------\n");
Jeej 8:db5679d113c2 218
Jeej 0:065f2318fcb9 219 FPRINT("(id:0x%08x)\r\n", osThreadGetId());
Jeej 0:065f2318fcb9 220
marin_wizzi 20:5856f9bfd8e3 221 modem_open(&callbacks);
Jeej 0:065f2318fcb9 222
marin_wizzi 20:5856f9bfd8e3 223 uint8_t id = modem_ref_get_id(my_main_callback);
Jeej 1:f4a7a48a5f2b 224
Jeej 5:ee132af18614 225 PRINT("Register Files\n");
Jeej 0:065f2318fcb9 226 // Button/Alarm is a local file. As we want to check the outcome of sending
Jeej 0:065f2318fcb9 227 // this, don't use D7AActP Notification but rather plain ALP ITF Forwarding.
Jeej 0:065f2318fcb9 228 // Declaration just allows remote access.
marin_wizzi 20:5856f9bfd8e3 229 ram_fs_new(FID_ALARM, (uint8_t*)&h_alarm, (uint8_t*)&f_alarm);
marin_wizzi 20:5856f9bfd8e3 230 modem_declare_file(FID_ALARM, (alp_file_header_t*)&h_alarm);
Jeej 0:065f2318fcb9 231
marin_wizzi 20:5856f9bfd8e3 232
marin_wizzi 20:5856f9bfd8e3 233 PRINT("Enable D7A interface\n");
marin_wizzi 20:5856f9bfd8e3 234 modem_d7a_enable_itf();
Jeej 1:f4a7a48a5f2b 235
marin_wizzi 20:5856f9bfd8e3 236 // Host revision file is in the modem. Update it.
marin_wizzi 20:5856f9bfd8e3 237 PRINT("Update host revision\n");
marin_wizzi 20:5856f9bfd8e3 238 modem_write_file(FID_HOST_REV, (void*)&f_rev, 0, sizeof(revision_t));
marin_wizzi 20:5856f9bfd8e3 239
Jeej 1:f4a7a48a5f2b 240
marin_wizzi 20:5856f9bfd8e3 241 // Retrieve modem revision
marin_wizzi 20:5856f9bfd8e3 242 PRINT("Send revision\n");
Jeej 14:788c749cabed 243
marin_wizzi 20:5856f9bfd8e3 244 revision_t rev;
marin_wizzi 20:5856f9bfd8e3 245
marin_wizzi 20:5856f9bfd8e3 246 modem_read_file(FID_WM_REV, &rev, 0, sizeof(revision_t));
Jeej 0:065f2318fcb9 247
Jeej 0:065f2318fcb9 248 #ifdef DEBUG_BUTTON
Jeej 0:065f2318fcb9 249 DebouncedInterrupt user_interrupt(DEBUG_BUTTON);
Jeej 0:065f2318fcb9 250 user_interrupt.attach(button_push_isr, IRQ_FALL, 500, true);
Jeej 0:065f2318fcb9 251
Jeej 19:68f3a84dbc8f 252 Thread but_th(osPriorityNormal, 4096, NULL);
Jeej 0:065f2318fcb9 253 osStatus status = but_th.start(button_user_thread);
Jeej 0:065f2318fcb9 254 ASSERT(status == osOK, "Failed to start but thread (err: %d)\r\n", status);
Jeej 0:065f2318fcb9 255 #endif
Jeej 0:065f2318fcb9 256
Jeej 6:05e26c3a495a 257 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 258 DigitalOut my_led(DEBUG_LED);
Jeej 0:065f2318fcb9 259 #endif
Jeej 0:065f2318fcb9 260
Jeej 0:065f2318fcb9 261 // Set main task to lowest priority
Jeej 17:d50191689d1f 262 osThreadSetPriority(osThreadGetId(), osPriorityLow);
Jeej 0:065f2318fcb9 263 while(true)
Jeej 0:065f2318fcb9 264 {
Jeej 17:d50191689d1f 265 ThisThread::sleep_for(500);
Jeej 6:05e26c3a495a 266 #ifdef DEBUG_LED
Jeej 0:065f2318fcb9 267 my_led = !my_led;
Jeej 0:065f2318fcb9 268 #endif
Jeej 0:065f2318fcb9 269 }
Jeej 0:065f2318fcb9 270 }