/* * Copyright (c) 2015 NXP B.V. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of NXP B.V. nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY NXP B.V. AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL NXP B.V. OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * This file is part of the Contiki operating system. * * Author: Theo van Daele * */ #include "contiki.h" #include "net/ipv6/uip-ds6.h" #include "net/ipv6/uip.h" #include "net/routing/routing.h" #include "net/linkaddr.h" #include "coap-engine.h" #include "sys/ctimer.h" #include "dev/uart-driver.h" #include "uart1.h" #include static void get_coap_rx_uart1_handler(coap_message_t *request, coap_message_t *response, uint8_t *buffer, uint16_t preferred_size, int32_t *offset); static void event_coap_rx_uart1_handler(void); static void put_post_tx_uart1_handler(coap_message_t *request, coap_message_t *response, uint8_t *buffer, uint16_t preferred_size, int32_t *offset); static void string2uart1(uint8_t *c); static int handleRxChar(uint8_t c); static int get_ringbuf(uint8_t *c); static int put_ringbuf(uint8_t c); /* COAP helpers */ static char content[COAP_MAX_CHUNK_SIZE]; static int content_len = 0; #define CONTENT_PRINTF(...) { if(content_len < sizeof(content)) content_len += snprintf(content+content_len, sizeof(content)-content_len, __VA_ARGS__); } /* Ringbuf: written to by uart isr. Size must be power of 2 */ #define RINGBUF_SIZE 32 #define RINGBUF_MAX_INDEX (RINGBUF_SIZE-1) static char ringbuf[RINGBUF_SIZE]; static int head_index = 1; /* index to write next data */ static int tail_index = 0; /* index where last read took place */ /* String aligned buffer */ #define RX_BUFFER_SIZE RINGBUF_SIZE static uint8_t rx_buf[RX_BUFFER_SIZE+1]; static uint8_t rx_buf_index = 0; /* index for rx_buf */ /*---------------------------------------------------------------------------*/ PROCESS(start_app, "START_APP"); PROCESS(rx_data_process, "RX_DATA"); AUTOSTART_PROCESSES(&start_app, &rx_data_process); /*---------------------------------------------------------------------------*/ /*********** COAP resources *************************************************/ /*****************************************************************************/ /* Observable resource and event handler to obtain terminal input from UART1 */ /*****************************************************************************/ EVENT_RESOURCE(resource_coap_rx_uart1, /* name */ "obs;title=\"rx_uart1\"", /* attributes */ get_coap_rx_uart1_handler, /* GET handler */ NULL, /* POST handler */ NULL, /* PUT handler */ NULL, /* DELETE handler */ event_coap_rx_uart1_handler); /* event handler */ static void get_coap_rx_uart1_handler(coap_message_t *request, coap_message_t *response, uint8_t *buffer, uint16_t preferred_size, int32_t *offset) { unsigned int accept = -1; coap_get_header_accept(request, &accept); if(accept == -1 || accept == TEXT_PLAIN) { content_len = 0; CONTENT_PRINTF("%s", rx_buf); coap_set_header_content_format(response, TEXT_PLAIN); coap_set_payload(response, (uint8_t *)content, content_len); } } static void event_coap_rx_uart1_handler(void) { /* Registered observers are notified and will trigger the GET handler to create the response. */ coap_notify_observers(&resource_coap_rx_uart1); } /*****************************************************************************/ /* GET/PUT resource to send data to terminal on UART1 */ /*****************************************************************************/ RESOURCE(resource_coap_tx_uart1, /* name */ "obs;title=\"tx_uart1\"", /* attributes */ NULL, /* GET handler */ put_post_tx_uart1_handler, /* POST handler */ put_post_tx_uart1_handler, /* PUT handler */ NULL); /* DELETE handler */ static void put_post_tx_uart1_handler(coap_message_t *request, coap_message_t *response, uint8_t *buffer, uint16_t preferred_size, int32_t *offset) { const uint8_t *request_content = NULL; unsigned int accept = -1; coap_get_header_accept(request, &accept); if(accept == -1 || accept == TEXT_PLAIN) { coap_get_payload(request, &request_content); string2uart1((uint8_t *)request_content); } } /*********** End COAP resources *********************************************/ /*---------------------------------------------------------------------------*/ PROCESS_THREAD(start_app, ev, data) { PROCESS_BEGIN(); static int is_coordinator = 0; memset(rx_buf, '\0', sizeof(rx_buf)); /* Define process that handles data */ process_start(&rx_data_process ,NULL); /* Initialise UART1 */ uart1_init(UART1_BAUD_RATE); /* Callback received byte */ uart1_set_input(handleRxChar); /* Start network stack */ if(is_coordinator) { NETSTACK_ROUTING.root_start(); } NETSTACK_MAC.on(); printf("Starting RPL node\n"); coap_activate_resource(&resource_coap_rx_uart1, "UART1-RX"); coap_activate_resource(&resource_coap_tx_uart1, "UART1-TX"); PROCESS_END(); } /*---------------------------------------------------------------------------*/ PROCESS_THREAD(rx_data_process, ev, data) { PROCESS_BEGIN(); /* Process is polled whenever data is available from uart isr */ uint8_t c; while(1) { PROCESS_YIELD_UNTIL(ev == PROCESS_EVENT_POLL); /* Read RX ringbuffer. ASCII chars Output when LF is seen. If overflowed, strings are skipped */ do { if (get_ringbuf(&c) == -1) { break; /* No more rx char's in ringbuffer */ } else { if (rx_buf_index == RX_BUFFER_SIZE) { /* Skip current content if buffer full */ rx_buf_index = 0; } rx_buf[rx_buf_index++] = c; if ((c == '\n')||(c == '\r')) { rx_buf[rx_buf_index] = '\0'; printf("RX on UART1: %s", rx_buf); /* Signal event to coap clients. Demo assumes data is consumed before new data comes in */ event_coap_rx_uart1_handler(); rx_buf_index = 0; } } } while (1); } PROCESS_END(); } /*************************************************************************/ /* Local test functions */ /*************************************************************************/ /* TX function for UART1 */ static void string2uart1(uint8_t *c) { while (*c!= '\0') { uart1_writeb(*c); c++; } } /* handleRxChar runs on uart isr */ static int handleRxChar(uint8_t c) { if (put_ringbuf(c) == -1) { printf("Ringbuf full. Skip char\n"); } else { /* Send event to rx data handler */ process_poll(&rx_data_process); } return 0; } /* Simple ringbuffer if tail==head, no data has been written yet on that position. So, empty buffer is also initial state */ static int get_ringbuf(uint8_t *c) { int return_val = 0; uart1_disable_interrupts(); if (head_index != ((tail_index + 1)&RINGBUF_MAX_INDEX)) { tail_index = ((tail_index + 1)& RINGBUF_MAX_INDEX); *c = ringbuf[tail_index]; } else { return_val = -1; } uart1_enable_interrupts(); return return_val; } static int put_ringbuf(uint8_t c) { int return_val = 0; uart1_disable_interrupts(); if (head_index != tail_index) { ringbuf[head_index] = c; head_index = ((head_index+1)&RINGBUF_MAX_INDEX); } else { return_val = -1; } uart1_enable_interrupts(); return return_val; }