WizziLab / Mbed OS D7A_1x_demo_LoRaWAN Featured

LoRaWAN demo.

Dependencies:   modem_ref_helper DebouncedInterrupt

modem_callbacks.cpp@7:026f8c8bcdab, 2018-09-20 (annotated)

Committer:
Jeej
Date:
Thu Sep 20 09:37:24 2018 +0000
Revision:
7:026f8c8bcdab
Parent:
0:06ba20deb797
Child:
15:86f6fa566d89
Updated libraries and APP for modem v5.2+

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Jeej 0:06ba20deb797 1 #include "modem_ref_helper.h"
Jeej 0:06ba20deb797 2
Jeej 0:06ba20deb797 3 extern Queue<void, 8> g_file_modified;
Jeej 0:06ba20deb797 4
Jeej 0:06ba20deb797 5 // ============================================================}}}
Jeej 0:06ba20deb797 6
Jeej 0:06ba20deb797 7 // Callbacks to MODEM's ALP requests
Jeej 0:06ba20deb797 8 // ============================================================{{{
Jeej 0:06ba20deb797 9 void my_read(u8 fid, u32 offset, u32 length, int id)
Jeej 0:06ba20deb797 10 {
Jeej 0:06ba20deb797 11 u8 data[256];
Jeej 0:06ba20deb797 12
Jeej 0:06ba20deb797 13 if (!ram_fs_read(fid, offset, length, data))
Jeej 0:06ba20deb797 14 {
Jeej 0:06ba20deb797 15 modem_respond_read(fid, data, offset, length, id);
Jeej 0:06ba20deb797 16 }
Jeej 0:06ba20deb797 17 else
Jeej 0:06ba20deb797 18 {
Jeej 0:06ba20deb797 19 modem_respond(0, ALP_ERR_FILE_NOT_FOUND, id);
Jeej 0:06ba20deb797 20 }
Jeej 0:06ba20deb797 21 }
Jeej 0:06ba20deb797 22
Jeej 0:06ba20deb797 23 void my_write(u8 fid, void *data, u32 offset, u32 length, int id)
Jeej 0:06ba20deb797 24 {
Jeej 0:06ba20deb797 25 if (!ram_fs_write(fid, offset, length, (uint8_t*)data))
Jeej 0:06ba20deb797 26 {
Jeej 0:06ba20deb797 27 modem_respond(0, ALP_ERR_NONE, id);
Jeej 0:06ba20deb797 28 g_file_modified.put((void*)fid);
Jeej 0:06ba20deb797 29 }
Jeej 0:06ba20deb797 30 else
Jeej 0:06ba20deb797 31 {
Jeej 0:06ba20deb797 32 modem_respond(0, ALP_ERR_FILE_NOT_FOUND, id);
Jeej 0:06ba20deb797 33 }
Jeej 0:06ba20deb797 34 }
Jeej 0:06ba20deb797 35
Jeej 0:06ba20deb797 36 void my_read_fprop(u8 fid, int id)
Jeej 0:06ba20deb797 37 {
Jeej 0:06ba20deb797 38 u8* hdr = (u8*)ram_fs_get_header(fid);
Jeej 0:06ba20deb797 39
Jeej 0:06ba20deb797 40 if (hdr != NULL)
Jeej 0:06ba20deb797 41 {
Jeej 0:06ba20deb797 42 modem_respond_fprop(fid, hdr, id);
Jeej 0:06ba20deb797 43 }
Jeej 0:06ba20deb797 44 else
Jeej 0:06ba20deb797 45 {
Jeej 0:06ba20deb797 46 modem_respond(0, ALP_ERR_FILE_NOT_FOUND, id);
Jeej 0:06ba20deb797 47 }
Jeej 0:06ba20deb797 48 }
Jeej 0:06ba20deb797 49
Jeej 0:06ba20deb797 50 void my_flush(u8 fid, int id)
Jeej 0:06ba20deb797 51 {
Jeej 0:06ba20deb797 52 // No flush in this file system
Jeej 0:06ba20deb797 53 modem_respond(0, ALP_ERR_NONE, id);
Jeej 0:06ba20deb797 54 }
Jeej 0:06ba20deb797 55
Jeej 0:06ba20deb797 56 void my_delete(u8 fid, int id)
Jeej 0:06ba20deb797 57 {
Jeej 0:06ba20deb797 58 modem_respond(0, (ram_fs_delete(fid))? ALP_ERR_FILE_NOT_FOUND : ALP_ERR_NONE, id);
Jeej 0:06ba20deb797 59 }
Jeej 0:06ba20deb797 60
Jeej 7:026f8c8bcdab 61 void my_udata(void *data, u32 length)
Jeej 7:026f8c8bcdab 62 {
Jeej 7:026f8c8bcdab 63 uint8_t* p = (uint8_t*)data;
Jeej 7:026f8c8bcdab 64 int32_t rem = length;
Jeej 7:026f8c8bcdab 65 alp_parsed_chunk_t r;
Jeej 7:026f8c8bcdab 66 d7a_sp_res_t* istat;
Jeej 7:026f8c8bcdab 67
Jeej 7:026f8c8bcdab 68 do {
Jeej 7:026f8c8bcdab 69 uint32_t parsed = alp_parse_chunk(&p, &r);
Jeej 7:026f8c8bcdab 70 if (!parsed)
Jeej 7:026f8c8bcdab 71 {
Jeej 7:026f8c8bcdab 72 // Discard the payload in case of parsing error.
Jeej 7:026f8c8bcdab 73 PRINT("Parsing error!\r\n");
Jeej 7:026f8c8bcdab 74 break;
Jeej 7:026f8c8bcdab 75 }
Jeej 7:026f8c8bcdab 76 rem -= parsed;
Jeej 7:026f8c8bcdab 77
Jeej 7:026f8c8bcdab 78 switch (r.type)
Jeej 7:026f8c8bcdab 79 {
Jeej 7:026f8c8bcdab 80 // Interface status
Jeej 7:026f8c8bcdab 81 case ALP_OPCODE_RSP_ISTATUS:
Jeej 7:026f8c8bcdab 82 // D7A Interface
Jeej 7:026f8c8bcdab 83 if (ALP_ITF_TYPE_D7A == r.meta.itf.type)
Jeej 7:026f8c8bcdab 84 {
Jeej 7:026f8c8bcdab 85 union {
Jeej 7:026f8c8bcdab 86 u8 b[8];
Jeej 7:026f8c8bcdab 87 u32 w[2];
Jeej 7:026f8c8bcdab 88 } uid;
Jeej 7:026f8c8bcdab 89
Jeej 7:026f8c8bcdab 90 // ISTATUS can come either alone or together with ALP_OPCODE_RSP_F_DATA
Jeej 7:026f8c8bcdab 91 // but there should be only one per payload, moreover it will come first
Jeej 7:026f8c8bcdab 92 istat = (d7a_sp_res_t*)r.data;
Jeej 7:026f8c8bcdab 93 memcpy(uid.b,istat->addressee.id,8);
Jeej 7:026f8c8bcdab 94
Jeej 7:026f8c8bcdab 95 PRINT("Got accessed by UID:%08X%08X SNR: %3ddB RXLEV: -%-3ddBm LB: %3ddB\n",
Jeej 7:026f8c8bcdab 96 HAL_U32_BYTE_SWAP(uid.w[0]), HAL_U32_BYTE_SWAP(uid.w[1]),
Jeej 7:026f8c8bcdab 97 istat->snr, istat->rxlev, istat->lb);
Jeej 7:026f8c8bcdab 98 }
Jeej 7:026f8c8bcdab 99 else
Jeej 7:026f8c8bcdab 100 {
Jeej 7:026f8c8bcdab 101 PRINT("Got accessed by unknown Interface 0x%02X\n", r.meta.itf.type);
Jeej 7:026f8c8bcdab 102 }
Jeej 7:026f8c8bcdab 103 break;
Jeej 7:026f8c8bcdab 104 // Data return
Jeej 7:026f8c8bcdab 105 case ALP_OPCODE_RSP_F_DATA:
Jeej 7:026f8c8bcdab 106 // RSP_F_DATA can come either alone or together with ISTATUS
Jeej 7:026f8c8bcdab 107 PRINT("Got UNS File[%3d]@%d %d Bytes\n", r.meta.f_data.fid, r.meta.f_data.offset, r.meta.f_data.length);
Jeej 7:026f8c8bcdab 108 break;
Jeej 7:026f8c8bcdab 109 default:
Jeej 7:026f8c8bcdab 110 PRINT("Untreated OPCODE %d\n", r.type);
Jeej 7:026f8c8bcdab 111 break;
Jeej 7:026f8c8bcdab 112 }
Jeej 7:026f8c8bcdab 113 } while (rem > 0);
Jeej 0:06ba20deb797 114 }
Jeej 0:06ba20deb797 115
Jeej 0:06ba20deb797 116 void my_lqual(u8 ifid, int per)
Jeej 0:06ba20deb797 117 {
Jeej 0:06ba20deb797 118 PRINT("Interface File [%3d] LQUAL : %d%% PER\r\n", ifid, per);
Jeej 0:06ba20deb797 119 }
Jeej 0:06ba20deb797 120
Jeej 0:06ba20deb797 121 void my_ldown(u8 ifid)
Jeej 0:06ba20deb797 122 {
Jeej 0:06ba20deb797 123 PRINT("Interface File [%3d] LDOWN\r\n", ifid);
Jeej 0:06ba20deb797 124 }
Jeej 0:06ba20deb797 125
Jeej 0:06ba20deb797 126 void my_reset(void)
Jeej 0:06ba20deb797 127 {
Jeej 0:06ba20deb797 128 PRINT("Restarting application...\r\n");
Jeej 0:06ba20deb797 129 FLUSH();
Jeej 0:06ba20deb797 130 NVIC_SystemReset();
Jeej 0:06ba20deb797 131 }
Jeej 0:06ba20deb797 132
Jeej 0:06ba20deb797 133 void my_boot(u8 cause, u16 number)
Jeej 0:06ba20deb797 134 {
Jeej 0:06ba20deb797 135 PRINT("Modem BOOT[%c] #%d\r\n", cause, number);
Jeej 0:06ba20deb797 136
Jeej 0:06ba20deb797 137 // Modem re-booted, restart APP
Jeej 0:06ba20deb797 138 my_reset();
Jeej 7:026f8c8bcdab 139 }
Jeej 7:026f8c8bcdab 140
Jeej 7:026f8c8bcdab 141 void my_busy(u8 busy)
Jeej 7:026f8c8bcdab 142 {
Jeej 7:026f8c8bcdab 143 if (busy)
Jeej 7:026f8c8bcdab 144 {
Jeej 7:026f8c8bcdab 145 PRINT("Modem Busy\r\n");
Jeej 7:026f8c8bcdab 146
Jeej 7:026f8c8bcdab 147 /* Stop report, do not use modem */
Jeej 7:026f8c8bcdab 148 /* Wait for modem reboot or modem not busy */
Jeej 7:026f8c8bcdab 149 }
Jeej 7:026f8c8bcdab 150 else
Jeej 7:026f8c8bcdab 151 {
Jeej 7:026f8c8bcdab 152 PRINT("Modem not Busy\r\n");
Jeej 7:026f8c8bcdab 153
Jeej 7:026f8c8bcdab 154 /* Resume reports */
Jeej 7:026f8c8bcdab 155 }
Jeej 0:06ba20deb797 156 }