twr_at_lora.c

#include <twr.h>
 
static struct
{
    twr_cmwx1zzabz_t *lora;
    char tmp[36];
 
} _at;
 
static bool _twr_at_lora_param_format_and_test(twr_atci_param_t *param, uint8_t length);
 
void twr_at_lora_init(twr_cmwx1zzabz_t *lora)
{
    _at.lora = lora;
}
 
bool twr_at_lora_deveui_read(void)
{
    twr_cmwx1zzabz_get_deveui(_at.lora, _at.tmp);
 
    twr_atci_printfln("$DEVEUI: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_deveui_set(twr_atci_param_t *param)
{
    if (!_twr_at_lora_param_format_and_test(param, 16))
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_deveui(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_devaddr_read(void)
{
    twr_cmwx1zzabz_get_devaddr(_at.lora, _at.tmp);
 
    twr_atci_printfln("$DEVADDR: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_devaddr_set(twr_atci_param_t *param)
{
 
    twr_cmwx1zzabz_set_devaddr(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_nwkskey_read(void)
{
    twr_cmwx1zzabz_get_nwkskey(_at.lora, _at.tmp);
 
    twr_atci_printfln("$NWKSKEY: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_nwkskey_set(twr_atci_param_t *param)
{
    if (!_twr_at_lora_param_format_and_test(param, 32))
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_nwkskey(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_appkey_read(void)
{
    twr_cmwx1zzabz_get_appkey(_at.lora, _at.tmp);
 
    twr_atci_printfln("$APPKEY: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_appkey_set(twr_atci_param_t *param)
{
    if (!_twr_at_lora_param_format_and_test(param, 32))
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_appkey(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_appeui_read(void)
{
    twr_cmwx1zzabz_get_appeui(_at.lora, _at.tmp);
 
    twr_atci_printfln("$APPEUI: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_appeui_set(twr_atci_param_t *param)
{
    if (!_twr_at_lora_param_format_and_test(param, 16))
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_appeui(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_appskey_read(void)
{
    twr_cmwx1zzabz_get_appskey(_at.lora, _at.tmp);
 
    twr_atci_printfln("$APPSKEY: %s", _at.tmp);
 
    return true;
}
 
bool twr_at_lora_appskey_set(twr_atci_param_t *param)
{
    if (!_twr_at_lora_param_format_and_test(param, 32))
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_appskey(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_band_read(void)
{
    twr_cmwx1zzabz_config_band_t band = twr_cmwx1zzabz_get_band(_at.lora);
 
    twr_atci_printfln("$BAND: %d", band);
 
    return true;
}
 
bool twr_at_lora_band_set(twr_atci_param_t *param)
{
    uint8_t band = atoi(param->txt);
 
    if (band > 8)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_band(_at.lora, band);
 
    return true;
}
 
bool twr_at_lora_mode_read(void)
{
    twr_cmwx1zzabz_config_mode_t mode = twr_cmwx1zzabz_get_mode(_at.lora);
 
    twr_atci_printfln("$MODE: %d", mode);
 
    return true;
}
 
bool twr_at_lora_mode_set(twr_atci_param_t *param)
{
    uint8_t mode = atoi(param->txt);
 
    if (mode > 1)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_mode(_at.lora, mode);
 
    return true;
}
 
bool twr_at_lora_join(void)
{
    twr_cmwx1zzabz_join(_at.lora);
 
    return true;
}
 
bool twr_at_lora_frmcnt(void)
{
    twr_cmwx1zzabz_frame_counter(_at.lora);
 
    return true;
}
 
bool twr_at_lora_reboot(void)
{
    twr_system_reset();
 
    return true;
}
 
bool twr_at_lora_freset(void)
{
    twr_cmwx1zzabz_factory_reset(_at.lora);
 
    return true;
}
 
bool twr_at_lora_link_check(void)
{
    twr_cmwx1zzabz_link_check(_at.lora);
 
    return true;
}
 
bool twr_at_lora_custom_at_set(twr_atci_param_t *param)
{
    // Skip 6 characters (AT$AT=)
    twr_cmwx1zzabz_custom_at(_at.lora, param->txt);
 
    return true;
}
 
bool twr_at_lora_rfq(void)
{
    twr_cmwx1zzabz_rfq(_at.lora);
 
    return true;
}
 
bool twr_at_lora_nwk_read(void)
{
    uint8_t nwk_public = twr_cmwx1zzabz_get_nwk_public(_at.lora);
 
    twr_atci_printfln("$NWK: %d", nwk_public);
 
    return true;
}
 
bool twr_at_lora_nwk_set(twr_atci_param_t *param)
{
    uint8_t nwk_public = atoi(param->txt);
 
    if (nwk_public > 1)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_nwk_public(_at.lora, nwk_public);
 
    return true;
}
 
bool twr_at_lora_adr_read(void)
{
    uint8_t adr = twr_cmwx1zzabz_get_adaptive_datarate(_at.lora);
 
    twr_atci_printfln("$ADR: %d", adr);
 
    return true;
}
 
bool twr_at_lora_adr_set(twr_atci_param_t *param)
{
    uint8_t adr = atoi(param->txt);
 
    if (adr > 1)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_adaptive_datarate(_at.lora, adr);
 
    return true;
}
 
bool twr_at_lora_dr_read(void)
{
    uint8_t dr = twr_cmwx1zzabz_get_datarate(_at.lora);
 
    twr_atci_printfln("$DR: %d", dr);
 
    return true;
}
 
bool twr_at_lora_dr_set(twr_atci_param_t *param)
{
    uint8_t dr = atoi(param->txt);
 
    if (dr > 15)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_datarate(_at.lora, dr);
 
    return true;
}
 
bool twr_at_lora_repu_read(void)
{
    uint8_t repeat = twr_cmwx1zzabz_get_repeat_unconfirmed(_at.lora);
 
    twr_atci_printfln("$REPU: %d", repeat);
 
    return true;
}
 
bool twr_at_lora_repu_set(twr_atci_param_t *param)
{
    uint8_t repeat = atoi(param->txt);
 
    if (repeat < 1 || repeat > 15)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_repeat_unconfirmed(_at.lora, repeat);
 
    return true;
}
 
bool twr_at_lora_repc_read(void)
{
    uint8_t repeat = twr_cmwx1zzabz_get_repeat_confirmed(_at.lora);
 
    twr_atci_printfln("$REPC: %d", repeat);
 
    return true;
}
 
bool twr_at_lora_repc_set(twr_atci_param_t *param)
{
    uint8_t repeat = atoi(param->txt);
 
    if (repeat < 1 || repeat > 8)
    {
        return false;
    }
 
    twr_cmwx1zzabz_set_repeat_confirmed(_at.lora, repeat);
 
    return true;
}
 
bool twr_at_lora_ver_read(void)
{
    const char *version = twr_cmwx1zzabz_get_fw_version(_at.lora);
 
    twr_atci_printfln("$VER: %s", version);
 
    return true;
}
 
bool twr_at_lora_debug_set(twr_atci_param_t *param)
{
    uint8_t debug = atoi(param->txt);
 
    twr_cmwx1zzabz_set_debug(_at.lora, (debug == 1) ? true : false);
 
    return true;
}
 
static bool _twr_at_lora_param_format_and_test(twr_atci_param_t *param, uint8_t length)
{
 
    // Capitalize letters
    for (uint32_t i = 0; param->txt[i] != '\0'; i++) {
        if (param->txt[i] >= 'a' && param->txt[i] <= 'z') {
            param->txt[i] = param->txt[i] - 32;
        }
    }
 
    // Skip spaces
    for (uint32_t i = 0; i < strlen(param->txt); i++)
    {
        while (param->txt[i] == ' ')
        {
            for (uint32_t q = 0; q < strlen(param->txt); q++)
            {
                param->txt[i + q] = param->txt[i + q + 1];
            }
        }
    }
 
    // Correct new string length
    param->length = strlen(param->txt);
 
    if (param->length != length)
    {
        return false;
    }
 
    // Check the string is HEX
    for (size_t i = 0; i < strlen(param->txt); i++)
    {
        if ((param->txt[i] >= '0' && param->txt[i] <= '9') || (param->txt[i] >= 'A' && param->txt[i] <= 'F'))
        {
            continue;
        }
 
        return false;
    }
 
    return true;
}