Send file data demo.
Dependencies: modem_ref_helper CRC DebouncedInterrupt
main.cpp
- Committer:
- Jeej
- Date:
- 2017-05-17
- Revision:
- 5:ee132af18614
- Parent:
- 4:999305b576c0
- Child:
- 6:05e26c3a495a
File content as of revision 5:ee132af18614:
// @autor: jeremie@wizzilab.com // @date: 2017-05-02 #include "mbed.h" #include "rtos.h" #include "DebouncedInterrupt.h" #include "WizziDebug.h" #include "WizziCom.h" #include "hwcfg.h" #include "files.h" #include "ram_fs.h" #include "modem_callbacks.h" #include "revision.h" #include "alp_spec.h" #include "alp_helpers.h" #include "modem_ref.h" #include "kal_fs.h" #include "d7a_1x.h" #include "d7a_1x_fs.h" #include "alp.h" #define MODEM_VERSION_MAJOR 4 #define MODEM_VERSION_MINOR 8 WizziCom* g_modem_com; Semaphore button_user(0); Semaphore modem_ready(0); Queue<void, 8> modem_resp; uint8_t g_main_id, g_report_id; enum { MODEM_RESP_NO, MODEM_RESP_TERMINAL, MODEM_RESP_DONE, }; TYPEDEF_STRUCT_PACKED { uint8_t type; d7a_sp_cfg_t cfg; } alp_d7a_itf_t; #define D7A_CTF_VAL(mant,exp) ((uint8_t)(mant|(exp<<5))) #define ALP_ITF_TYPE_D7A 0xD7 alp_d7a_itf_t alarm_itf = { .type = ALP_ITF_TYPE_D7A, .cfg.to = 0, .cfg.te = 0, .cfg.qos.bf.record = 0, .cfg.qos.bf.stop_on_err = 0, .cfg.qos.bf.resp = D7A_RESP_PREFERRED, .cfg.addressee.ctrl.bf.nls = D7A_NLS_AES_CCM_64, .cfg.addressee.ctrl.bf.idf = D7A_ID_NBID, .cfg.addressee.xcl.bf = {.s = 0x2, .m = 0x1},// XXX D7A_XCL_GW, .cfg.addressee.id[0] = D7A_CTF_VAL(1,1), .cfg.qos.bf.retry = 1 // XXX WM_RPOL_RARE_SINGLE_CHECK, }; #define MY_D7_ITF_SIZE(_itf) (1+my_alp_itf_d7a_cfg_size(&(_itf)->cfg)) int my_alp_itf_d7a_cfg_size(d7a_sp_cfg_t* cfg) { int size = sizeof(d7a_sp_cfg_t) - sizeof(d7a_addressee_t); size += D7A_ADDR_LEN(cfg->addressee.ctrl); return size; } // Interrupt Service Routine on button press. void button_push_isr( void ) { button_user.release(); } // Callback for broadcast read void my_response_callback(uint8_t terminal, int8_t err, uint8_t id) { (void)id; PRINT("TERMINAL %d STATUS %d\r\n", terminal, err); if (terminal) { modem_resp.put((void*)MODEM_RESP_TERMINAL); } else { if (ALP_ERR_NONE == err) { modem_resp.put((void*)MODEM_RESP_DONE); } } } void button_user_thread() { FPRINT("(id:0x%08x)\r\n", osThreadGetId()); osEvent evt; uint32_t resp; uint8_t alarm; uint8_t my_user_id = modem_get_id(my_response_callback); d7a_sp_res_t istat; uint8_t nb = 0; memset(&istat, 0, sizeof(d7a_sp_res_t)); // Load alarm value ram_fs_read(FID_ALARM, 0, 1, &alarm); // Send initial value modem_send_file_content((uint8_t*)&alarm_itf, MY_D7_ITF_SIZE(&alarm_itf), (void*)&istat, FID_ALARM, &alarm, 0, 1, g_main_id); modem_ready.wait(); while (true) { // Wait for button press button_user.wait(); // load/save value to keep choerency in case of remote access... ram_fs_read(FID_ALARM, 0, 1, &alarm); // Toggle alarm state alarm = !alarm; ram_fs_write(FID_ALARM, 0, 1, &alarm); PRINT("BUTTON ALARM %d\r\n", alarm); modem_send_file_content((uint8_t*)&alarm_itf, MY_D7_ITF_SIZE(&alarm_itf), (void*)&istat, FID_ALARM, &alarm, 0, 1, my_user_id); do { evt = modem_resp.get(); resp = (evt.status == osEventMessage)? (uint32_t)evt.value.p : NULL; nb++; PRINT("ACK %d: ", nb); PRINT_DATA("UID:", "%02X", istat.addressee.id, 8, " "); PRINT("rxlev:%d lb:%d\n", istat.rxlev, istat.lb); memset(&istat, 0, sizeof(d7a_sp_res_t)); } while (MODEM_RESP_TERMINAL != resp); PRINT("BUTTON ALARM DONE\r\n"); } } // Misc // ============================================================{{{ void my_get_alp_file_props(uint8_t fid, alp_file_header_t* hdr) { memcpy(hdr, ram_fs_get_header(fid), sizeof(alp_file_header_t)); } void print_status(int status) { switch (status) { case ALP_ERR_NONE: PRINT("Status: OK\n"); break; case ALP_ERR_FILE_EXIST: PRINT("Status: Already registered\n"); break; default: PRINT("Status: error %d\n", status); break; } } void print_resp(int status) { switch (status) { case ALP_ERR_NONE: PRINT("Resp: OK\n"); break; case ALP_ERR_FILE_EXIST: PRINT("Resp: Already registered\n"); break; default: PRINT("Resp: error %d\n", status); break; } } // ============================================================}}} // Serial adapters to WizziLab's own architecture // ============================================================{{{ void my_serial_input(WizziCom* com, WizziComPacket_t* pkt) { modem_input(wizzicom_type_to_flow(pkt->type), pkt->data, pkt->length); FREE(pkt); } int my_serial_send(uint8_t* data1, uint8_t size1, uint8_t* data2, uint8_t size2) { (void)size1; g_modem_com->send((WizziComPacketType)wizzicom_flow_to_type(data1[4]), size2, data2); return (size1 + size2); } modem_callbacks_t callbacks = { .read = my_read, .write = my_write, .read_fprop = my_read_fprop, .flush = my_flush, .remove = my_delete, .lqual = my_lqual, .ldown = my_ldown, .reset = my_reset, .boot = my_boot }; // Callback for g_main_id User void my_main_callback(uint8_t terminal, int8_t err, uint8_t id) { (void)id; if (terminal) { print_status(err); modem_ready.release(); } else { print_resp(err); } } void modem_update_file(uint8_t fid, alp_file_header_t* header, uint8_t* data) { alp_file_header_t remote_header; memset(&remote_header, 0, sizeof(alp_file_header_t)); // Read remote header modem_read_fprop(fid, &remote_header, g_main_id); modem_ready.wait(); // Add file in local file system ram_fs_new(fid, (uint8_t*)header, data); // Update file if (memcmp(&remote_header, header, sizeof(alp_file_header_t))) { PRINT("Updating file %d\n", fid); // Delete modem_delete_file(fid, g_main_id); modem_ready.wait(); // Restore in local file system ram_fs_new(fid, (uint8_t*)header, data); // Re-create if (data) { modem_declare_file(fid, header, g_main_id); } else { modem_create_file(fid, header, g_main_id); } modem_ready.wait(); } else { PRINT("File %d up to date\n", fid); } } /*** Main function ------------------------------------------------------------- ***/ int main() { // Start & initialize DBG_OPEN(DEBUG_LED); PRINT("\r\n--- Starting new run ---\r\n"); FPRINT("(id:0x%08x)\r\n", osThreadGetId()); static union { uint8_t b[8]; uint32_t w[2]; } uid; revision_t rev; // Hardware reset DigitalOut reset_low(MODEM_PIN_RESET, 0); Thread::wait(100); // Release reset DigitalIn reset_release(MODEM_PIN_RESET); Thread::wait(2000); // Open modem Com port g_modem_com = new WizziCom(MODEM_PIN_TX, MODEM_PIN_RX, MODEM_PIN_IRQ_OUT, MODEM_PIN_IRQ_IN); // Redirect All Port traffic to my_serial_input g_modem_com->attach(my_serial_input, WizziComPacketOther); modem_open(my_serial_send, &callbacks); g_main_id = modem_get_id(my_main_callback); PRINT("Start Modem Process (id=%d)\n", g_main_id); Thread::wait(1000); modem_read_file(D7A_FID_UID, uid.b, 0, 8, g_main_id); modem_ready.wait(); modem_read_file(D7A_FID_FIRMWARE_VERSION, (uint8_t*)&rev, 0, sizeof(revision_t), g_main_id); modem_ready.wait(); PRINT("------------ D7A Modem infos ------------\r\n"); PRINT_DATA(" - UID: ", "%02X", uid.b, 8, "\r\n"); PRINT(" - Manufacturer ID: %08X\r\n", rev.manufacturer_id); PRINT(" - Device ID: %08X\r\n", rev.device_id); PRINT(" - Hardware version: %08X\r\n", rev.hw_version); PRINT(" - Firmware version: v%d.%d.%d\r\n", rev.fw_version.major, rev.fw_version.minor, rev.fw_version.patch); PRINT(" - File system CRC: 0x%08x\r\n", rev.fs_crc); PRINT("-----------------------------------------\r\n"); // Check version if (rev.fw_version.major != MODEM_VERSION_MAJOR || rev.fw_version.minor != MODEM_VERSION_MINOR) { PRINT("You need a modem at version %d.%d.x to use this APP.\n" "Please check updates by importing:\n" "https://developer.mbed.org/teams/WizziLab/code/D7A_WM_Updater\n" , MODEM_VERSION_MAJOR, MODEM_VERSION_MINOR); Thread::wait(osWaitForever); } PRINT("Register Files\n"); // HOST Revision is a local file. Uses D7AActP Notification. modem_update_file(FID_HOST_REV, (alp_file_header_t*)&h_rev, (uint8_t*)&f_rev); // Button/Alarm is a local file. As we want to check the outcome of sending // this, don't use D7AActP Notification but rather plain ALP ITF Forwarding. // Declaration just allows remote access. modem_update_file(FID_ALARM, (alp_file_header_t*)&h_alarm, (uint8_t*)&f_alarm); // Configure URC: LQUAL on report file notification every 10 reports PRINT("Setup URCs\n"); modem_enable_urc(ALP_URC_TYPE_LQUAL, IFID_REPORT, 10, true, g_main_id); modem_ready.wait(); PRINT("Start D7A Stack\n"); modem_activate_itf(ALP_ITF_TYPE_D7A, 24, 0, ALP_D7A_ISTAT_RESP , true, g_main_id); modem_ready.wait(); PRINT("Notify Modem Version\n"); modem_notify_file(D7A_FID_FIRMWARE_VERSION, 0, SIZE_HOST_REV, g_main_id); modem_ready.wait(); PRINT("Notify FW Version\n"); modem_notify_file(FID_HOST_REV, 0, SIZE_HOST_REV, g_main_id); modem_ready.wait(); #ifdef DEBUG_BUTTON DebouncedInterrupt user_interrupt(DEBUG_BUTTON); user_interrupt.attach(button_push_isr, IRQ_FALL, 500, true); Thread but_th(osPriorityNormal, 2048, NULL); osStatus status = but_th.start(button_user_thread); ASSERT(status == osOK, "Failed to start but thread (err: %d)\r\n", status); #endif #if (DEBUG_LED != NC) DigitalOut my_led(DEBUG_LED); #endif // Set main task to lowest priority osThreadSetPriority(osThreadGetId(), osPriorityIdle); while(true) { Thread::wait(500); #if (DEBUG_LED != NC) my_led = !my_led; #endif } }