Diff: main.cpp

Revision:

0:cc947267028b

Child:

1:5ddd7f4db10d

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/main.cpp	Tue May 09 12:56:20 2017 +0000
@@ -0,0 +1,307 @@
+// @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 "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 "alp.h"
+
+
+WizziCom* g_modem_com;
+Semaphore button_user(0);
+Semaphore modem_ready(0);
+Queue<void, 8> modem_resp;
+
+enum {
+    MODEM_RESP_NO,
+    MODEM_RESP_TERMINAL,
+    MODEM_RESP_DONE,
+};
+
+uint8_t g_main_id;
+
+TYPEDEF_STRUCT_PACKED {
+    uint8_t type;
+    d7a_sp_cfg_t cfg;
+} alp_d7a_itf_t;
+
+#define WM_FID_ALP_CFG          50
+#define MY_POLICY_IDX           0
+
+alp_retry_policy_t my_policy = {
+    .meta.procedure     = 0,
+    .meta.respond       = true,
+    .meta.persistant    = false,
+    .meta.bulk          = false,
+    .depth              = 1,
+    .retries            = 0,
+    .slot_time          = 0
+};
+
+#define D7A_CTF_VAL(mant,exp)   ((uint8_t)(mant|(exp<<5)))
+#define ALP_ITF_TYPE_D7A        0xD7
+alp_d7a_itf_t my_itf = {
+    .type                           = ALP_ITF_TYPE_D7A,
+    .cfg.to                         = 0,
+    .cfg.te                         = 0,
+    .cfg.qos.bf.resp                = D7A_RESP_ALL,
+    .cfg.qos.bf.retry               = MY_POLICY_IDX,
+    .cfg.qos.bf.record              = 0,
+    .cfg.qos.bf.stop_on_err         = 0,
+    .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(4,0),
+};
+
+#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;
+}
+
+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;
+    }
+}
+
+// Callback for broadcast read
+void my_read_response_callback(uint8_t terminal, int8_t err, uint8_t id)
+{
+    (void)id;
+    
+    if (terminal)
+    {    
+        print_status(err);
+        modem_resp.put((void*)MODEM_RESP_TERMINAL);
+    }
+    else
+    {
+        //print_resp(err);
+        if (ALP_ERR_NONE == err)
+        {
+            modem_resp.put((void*)MODEM_RESP_DONE);
+        }
+    }
+}
+
+// Interrupt Service Routine on button press.
+void button_push_isr( void )
+{
+    button_user.release();
+}
+
+void button_user_thread()
+{
+    osEvent evt;
+    uint32_t resp;
+    d7a_sp_res_t istat;
+    fw_version_t fw_ver;
+    uint8_t gw_nb = 0;
+
+    uint8_t my_user_id = modem_get_id(my_read_response_callback);
+    
+    FPRINT("(id:0x%08x)\r\n", osThreadGetId());
+    
+    //uint8_t scan_xcl[] = { 0x0F, 0x2F, 0x8F, 0x9F };
+    uint8_t scan_xcl[] = { 0x2F };
+    
+    // Set custom retry policy
+    //modem_write_file(WM_FID_ALP_CFG, &my_policy, MY_POLICY_IDX * sizeof(alp_retry_policy_t), sizeof(alp_retry_policy_t), g_main_id);
+    //modem_ready.wait();
+    
+    while (true)
+    {
+        // Wait for button press
+        button_user.wait();
+        
+        for (uint8_t i = 0; i < sizeof(scan_xcl); i++)
+        {
+            gw_nb = 0;
+            my_itf.cfg.addressee.xcl.byte = scan_xcl[i];
+            
+            modem_remote_read_file((uint8_t*)&my_itf, MY_D7_ITF_SIZE(&my_itf), (void*)&istat, 2, (void*)&fw_ver, 12, sizeof(fw_version_t), my_user_id);
+            
+            do
+            {
+                evt = modem_resp.get();
+                resp = (evt.status == osEventMessage)? (uint32_t)evt.value.p : NULL;
+                
+                if (MODEM_RESP_DONE == resp)
+                {
+                    gw_nb++;
+                    PRINT("%d: XCL:%02X ", gw_nb, istat.addressee.xcl.byte);
+                    PRINT_DATA("UID: ", "%02X", istat.addressee.id, 8, " ");
+                    PRINT("v%d.%d.%d ", fw_ver.major, fw_ver.minor, fw_ver.patch);
+                    PRINT("rxlev:%d lb:%d\n", istat.rxlev, istat.lb);
+                }
+            } while (MODEM_RESP_TERMINAL != resp);
+        
+        }
+        
+        PRINT("DONE\n");
+    }
+}
+
+// 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);
+    }
+}
+
+/*** 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());
+    
+    alp_file_header_t hdr;
+    static union {
+        uint8_t      b[8];
+        uint32_t     w[2];
+    } uid;
+    revision_t rev;
+    
+    // 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(0, uid.b, 0, 8, g_main_id);
+    modem_ready.wait();
+    
+    modem_read_file(2, &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");
+    
+    // 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();
+
+#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
+
+#ifdef DEBUG_LED
+    DigitalOut my_led(DEBUG_LED);
+#endif
+    
+    // Set main task to lowest priority
+    osThreadSetPriority(osThreadGetId(), osPriorityIdle);
+    while(true)
+    {
+        Thread::wait(500);
+#ifdef DEBUG_LED
+        my_led = !my_led;
+#endif
+    }
+}
\ No newline at end of file