Fork of KL46Z Wifi version. Moved to KL25Z as umbrella stand now requires 2 SPIs, thus requires 46z.

Dependencies:   WIZnet_Library_ASE mbed nanoservice_client_1_12

Fork of Trenton_Doormat_FRDM-KL25Z_ETH by Eric Gowland

nsdl_support.cpp

Committer:
erigow01
Date:
2014-04-04
Revision:
16:3fb612af0dc5
Child:
17:8ca4a5801430

File content as of revision 16:3fb612af0dc5:

// NSDL library support functions

#include "mbed.h"
#include "nsdl_support.h"
#include "mbed.h"
#include "rtos.h"
#include "WiflyInterface.h"

extern Endpoint nsp;
extern UDPSocket server;
//extern TCPSocketConnection server;
extern char endpoint_name[16];
extern uint8_t ep_type[];
extern uint8_t lifetime_ptr[];

/* The number of seconds between NSP registration messages */
#define RD_UPDATE_PERIOD  300

void *nsdl_alloc(uint16_t size)
{
    return malloc(size);
}

void nsdl_free(void* ptr_to_free)
{
    free(ptr_to_free);
}

/*
 * Create a static resoure
 * Only get is allowed
 */
void nsdl_create_static_resource(sn_nsdl_resource_info_s *resource_structure, uint16_t pt_len, uint8_t *pt, uint16_t rpp_len, uint8_t *rpp_ptr, uint8_t *rsc, uint16_t rsc_len)
{
    resource_structure->access = SN_GRS_GET_ALLOWED;
    resource_structure->mode = SN_GRS_STATIC;
    resource_structure->pathlen = pt_len;
    resource_structure->path = pt;
    resource_structure->resource_parameters_ptr->resource_type_len = rpp_len;
    resource_structure->resource_parameters_ptr->resource_type_ptr = rpp_ptr;
    resource_structure->resource = rsc;
    resource_structure->resourcelen = rsc_len;
    sn_nsdl_create_resource(resource_structure);
}

void nsdl_create_dynamic_resource(sn_nsdl_resource_info_s *resource_structure, uint16_t pt_len, uint8_t *pt, uint16_t rpp_len, uint8_t *rpp_ptr, uint8_t is_observable, sn_grs_dyn_res_callback_t callback_ptr, int access_right)
{
    resource_structure->access = (sn_grs_resource_acl_e)access_right;
    resource_structure->resource = 0;
    resource_structure->resourcelen = 0;
    resource_structure->sn_grs_dyn_res_callback = callback_ptr;
    resource_structure->mode = SN_GRS_DYNAMIC;
    resource_structure->pathlen = pt_len;
    resource_structure->path = pt;
    resource_structure->resource_parameters_ptr->resource_type_len = rpp_len;
    resource_structure->resource_parameters_ptr->resource_type_ptr = rpp_ptr;
    resource_structure->resource_parameters_ptr->observable = is_observable;
    sn_nsdl_create_resource(resource_structure);
}

sn_nsdl_ep_parameters_s* nsdl_init_register_endpoint(sn_nsdl_ep_parameters_s *endpoint_structure, uint8_t* name, uint8_t* typename_ptr, uint8_t *lifetime_ptr)
{
    if (NULL == endpoint_structure)
    {   
        endpoint_structure = (sn_nsdl_ep_parameters_s*)nsdl_alloc(sizeof(sn_nsdl_ep_parameters_s));
    }
    if (endpoint_structure)
    {
        memset(endpoint_structure, 0, sizeof(sn_nsdl_ep_parameters_s));
        endpoint_structure->endpoint_name_ptr = name;
        endpoint_structure->endpoint_name_len = strlen((char*)name);
        endpoint_structure->type_ptr = typename_ptr;
        endpoint_structure->type_len =  strlen((char*)typename_ptr);
        endpoint_structure->lifetime_ptr = lifetime_ptr;
        endpoint_structure->lifetime_len =  strlen((char*)lifetime_ptr);
    }
    return endpoint_structure;
}

void nsdl_clean_register_endpoint(sn_nsdl_ep_parameters_s **endpoint_structure)
{
    if (*endpoint_structure)
    {
        nsdl_free(*endpoint_structure);
        *endpoint_structure = NULL;
    }
}

static uint8_t tx_cb(sn_nsdl_capab_e protocol, uint8_t *data_ptr, uint16_t data_len, sn_nsdl_addr_s *address_ptr)
{
    /*
    //TCP
    int buffer_len = data_len+2;
    printf("TX callback! Sending %d bytes", buffer_len);
    char buffer[buffer_len];
    buffer[0] = data_len >> 8;
    buffer[1] = data_len & 0xFF;
    memcpy(buffer+2, data_ptr, data_len);
    
    //if(cellular->write((char*)buffer, (int)buffer_len, 1000) != buffer_len)
    if(server.send((char*)data_ptr, data_len) != data_len)
        printf("Sending failed");

    return 1;
    */

    //UDP
    printf("TX callback!\n\rSending %d bytes\r\n", data_len);
    if(server.sendTo(nsp, (char*)data_ptr, data_len) != data_len)
        printf("sending failed\n\r");

    return 1;

}

static uint8_t rx_cb(sn_coap_hdr_s *coap_packet_ptr, sn_nsdl_addr_s *address_ptr)
{
    printf("RX callback!\r\n");
    return 0;
}

static void registration_update_thread(void const *args)
{
    sn_nsdl_ep_parameters_s *endpoint_ptr = NULL;

    while(true)
    {
        wait(RD_UPDATE_PERIOD);
        printf("NSP attempt re-register...\r\n");
        endpoint_ptr = nsdl_init_register_endpoint(endpoint_ptr, (uint8_t*)endpoint_name, ep_type, lifetime_ptr);
        if(sn_nsdl_register_endpoint(endpoint_ptr) != 0)
            printf("NSP re-registering failed\r\n");
        else
            printf("NSP re-registering OK\r\n");
        nsdl_clean_register_endpoint(&endpoint_ptr);
    }
}

void nsdl_init()
{
    uint8_t nsp_addr[4];
    sn_nsdl_mem_s memory_cbs;

    /* Initialize libNsdl */
    memory_cbs.sn_nsdl_alloc = &nsdl_alloc;
    memory_cbs.sn_nsdl_free = &nsdl_free;
    if(sn_nsdl_init(&tx_cb, &rx_cb, &memory_cbs) == -1)
        printf("libNsdl init failed\r\n");
    else
        printf("libNsdl init done\r\n");

    /* Set nsp address for library */
    set_NSP_address(nsp_addr, 5683, SN_NSDL_ADDRESS_TYPE_IPV4);
}

void nsdl_event_loop()
{
    //Thread registration_thread(registration_update_thread);

    sn_nsdl_addr_s received_packet_address;
    uint8_t received_address[4];
    int8_t nsdl_result = 0;
    //UDP
    char buffer[1024];
    //TCP
    //char buffer[2048];
    Endpoint from;

    memset(&received_packet_address, 0, sizeof(sn_nsdl_addr_s));
    received_packet_address.addr_ptr = received_address;

    while(1)
    {
        //UDP
        int n = server.receiveFrom(from, buffer, sizeof(buffer));
        //TCP
        //int n = server.receive(buffer, sizeof(buffer));
        if (n < 0)
        {
            printf("Socket error\n\r");
        }
        else
        { 
        /*
            //TCP
            uint16_t len = 0;
            if (n > 2) {
                len = 256 * buffer[0] + buffer[1]; 
                printf("CoAP length header = %d bytes", len);
                sn_nsdl_process_coap((uint8_t*)buffer+2, len, &received_packet_address);
            }
            */
        
            //UDP
            wait(0.25); //Waiting seems to increase reliability of comms...
            printf("Received %d bytes\r\n", n);
            nsdl_result = sn_nsdl_process_coap((uint8_t*)buffer, n, &received_packet_address);
            printf("Processed COAP Packet: %d\r\n", nsdl_result);
        
        }
    }
}