Moving the avr-rss2 platform examples to the global examples
location as suggested by the maintainers.
This commit is contained in:
Robert Olsson
parent
39094e3c41
commit
3c19e870f1
47 changed files with 0 additions and 0 deletions
413
examples/avr-rss2/ipv6/dc-rpl-coap/coap-client.c
Normal file
413
examples/avr-rss2/ipv6/dc-rpl-coap/coap-client.c
Normal file
|
|
@ -0,0 +1,413 @@
|
|||
/*
|
||||
* 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 the Institute 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 THE INSTITUTE 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 THE INSTITUTE 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.
|
||||
*
|
||||
*/
|
||||
|
||||
#include "contiki.h"
|
||||
#include "contiki-net.h"
|
||||
#include "lib/random.h"
|
||||
#include "sys/ctimer.h"
|
||||
#include "net/ip/uip.h"
|
||||
#include "net/ipv6/uip-ds6.h"
|
||||
#include "net/ip/uip-udp-packet.h"
|
||||
#ifdef WITH_COMPOWER
|
||||
#include "powertrace.h"
|
||||
#endif
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
||||
/**************************************************************************/
|
||||
/* from er-rest-example/er-rexample-client.c */
|
||||
#include <stdlib.h>
|
||||
#include "er-coap-engine.h"
|
||||
#include "er-coap.h"
|
||||
#include "er-coap-observe-client.h"
|
||||
/* #include "dev/button-sensor.h" */
|
||||
|
||||
#if PLATFORM_HAS_LEDS
|
||||
#include "dev/leds.h"
|
||||
#endif
|
||||
|
||||
#define DEBUG 1
|
||||
#if DEBUG
|
||||
#include <stdio.h>
|
||||
#define PRINTF(...) printf(__VA_ARGS__)
|
||||
#define PRINT6ADDR(addr) PRINTF("[%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x:%02x%02x]", ((uint8_t *)addr)[0], ((uint8_t *)addr)[1], ((uint8_t *)addr)[2], ((uint8_t *)addr)[3], ((uint8_t *)addr)[4], ((uint8_t *)addr)[5], ((uint8_t *)addr)[6], ((uint8_t *)addr)[7], ((uint8_t *)addr)[8], ((uint8_t *)addr)[9], ((uint8_t *)addr)[10], ((uint8_t *)addr)[11], ((uint8_t *)addr)[12], ((uint8_t *)addr)[13], ((uint8_t *)addr)[14], ((uint8_t *)addr)[15])
|
||||
#define PRINTLLADDR(lladdr) PRINTF("[%02x:%02x:%02x:%02x:%02x:%02x]", (lladdr)->addr[0], (lladdr)->addr[1], (lladdr)->addr[2], (lladdr)->addr[3], (lladdr)->addr[4], (lladdr)->addr[5])
|
||||
#else
|
||||
#define PRINTF(...)
|
||||
#define PRINT6ADDR(addr)
|
||||
#define PRINTLLADDR(addr)
|
||||
#endif
|
||||
|
||||
/* FIXME: This server address is hard-coded for Cooja and link-local for unconnected border router. */
|
||||
/* #define SERVER_NODE(ipaddr) uip_ip6addr(ipaddr, 0xfe80, 0, 0, 0, 0x0212, 0x7402, 0x0002, 0x0202) / * cooja2 * / */
|
||||
/* #define SERVER_NODE(ipaddr) uip_ip6addr(ipaddr, 0xbbbb, 0, 0, 0, 0, 0, 0, 0x1) */
|
||||
|
||||
/* #define SERVER_NODE(ipaddr) uip_ip6addr(ipaddr, 0x2000, 0, 0, 0, 0, 0, 0, 0x0001) */
|
||||
#define LOCAL_PORT UIP_HTONS(COAP_DEFAULT_PORT + 1)
|
||||
#define REMOTE_PORT UIP_HTONS(COAP_DEFAULT_PORT)
|
||||
|
||||
#define GET_INTERVAL 10
|
||||
/* #define OBSERVE_INTERVAL 10 */
|
||||
|
||||
/**************************************************************************/
|
||||
|
||||
#define UDP_CLIENT_PORT 8765
|
||||
#define UDP_SERVER_PORT 5678
|
||||
|
||||
#define UDP_EXAMPLE_ID 190
|
||||
|
||||
/* #define DEBUG DEBUG_PRINT */
|
||||
/* #include "net/ip/uip-debug.h" */
|
||||
|
||||
#ifndef PERIOD
|
||||
/* #define PERIOD 60 */
|
||||
#define PERIOD 10
|
||||
#endif
|
||||
|
||||
#define START_INTERVAL (15 * CLOCK_SECOND)
|
||||
#define SEND_INTERVAL (PERIOD * CLOCK_SECOND)
|
||||
#define SEND_TIME (random_rand() % (SEND_INTERVAL))
|
||||
|
||||
/* static struct uip_udp_conn *client_conn; */
|
||||
static uip_ipaddr_t server_ipaddr;
|
||||
static coap_observee_t *obs;
|
||||
static int count_notify = 0;
|
||||
|
||||
/**************************************************************************/
|
||||
static struct etimer et;
|
||||
|
||||
/* Example URIs that can be queried. */
|
||||
#define NUMBER_OF_URLS 4
|
||||
/* leading and ending slashes only for demo purposes, get cropped automatically when setting the Uri-Path */
|
||||
char *service_urls[NUMBER_OF_URLS] =
|
||||
{ ".well-known/core", "/dcdc/status", "/dcdc/vdc", "/dcdc/hwcfg" };
|
||||
/*
|
||||
#if PLATFORM_HAS_BUTTON
|
||||
static int uri_switch = 0;
|
||||
#endif
|
||||
*/
|
||||
/* This function is will be passed to COAP_BLOCKING_REQUEST() to handle responses. */
|
||||
void
|
||||
client_chunk_handler(void *response)
|
||||
{
|
||||
const uint8_t *chunk;
|
||||
|
||||
int len = coap_get_payload(response, &chunk);
|
||||
|
||||
#if PLATFORM_HAS_LEDS
|
||||
/* set red led when receiving a packet */
|
||||
leds_on(LEDS_RED);
|
||||
#endif
|
||||
|
||||
/* printf("|%.*s", len, (char *)chunk); */
|
||||
printf("RX: %d\n%s\n", len, (char *)chunk);
|
||||
}
|
||||
/**************************************************************************/
|
||||
|
||||
/*---------------------------------------------------------------------------*/
|
||||
PROCESS(coap_client_process, "CoAP client process");
|
||||
AUTOSTART_PROCESSES(&coap_client_process);
|
||||
/*---------------------------------------------------------------------------*/
|
||||
static void
|
||||
tcpip_handler(void)
|
||||
{
|
||||
char *str;
|
||||
|
||||
if(uip_newdata()) {
|
||||
str = uip_appdata;
|
||||
str[uip_datalen()] = '\0';
|
||||
printf("DATA recv '%s'\n", str);
|
||||
}
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
static void
|
||||
print_local_addresses(void)
|
||||
{
|
||||
int i;
|
||||
uint8_t state;
|
||||
|
||||
PRINTF("Client IPv6 addresses: ");
|
||||
for(i = 0; i < UIP_DS6_ADDR_NB; i++) {
|
||||
state = uip_ds6_if.addr_list[i].state;
|
||||
if(uip_ds6_if.addr_list[i].isused &&
|
||||
(state == ADDR_TENTATIVE || state == ADDR_PREFERRED)) {
|
||||
PRINT6ADDR(&uip_ds6_if.addr_list[i].ipaddr);
|
||||
PRINTF("\n");
|
||||
/* hack to make address "final" */
|
||||
if(state == ADDR_TENTATIVE) {
|
||||
uip_ds6_if.addr_list[i].state = ADDR_PREFERRED;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
static void
|
||||
set_global_address(void)
|
||||
{
|
||||
uip_ipaddr_t ipaddr;
|
||||
|
||||
uip_ip6addr(&ipaddr, 0xaaaa, 0, 0, 0, 0, 0, 0, 0);
|
||||
uip_ds6_set_addr_iid(&ipaddr, &uip_lladdr);
|
||||
uip_ds6_addr_add(&ipaddr, 0, ADDR_AUTOCONF);
|
||||
|
||||
/* The choice of server address determines its 6LoPAN header compression.
|
||||
* (Our address will be compressed Mode 3 since it is derived from our link-local address)
|
||||
* Obviously the choice made here must also be selected in udp-server.c.
|
||||
*
|
||||
* For correct Wireshark decoding using a sniffer, add the /64 prefix to the 6LowPAN protocol preferences,
|
||||
* e.g. set Context 0 to aaaa::. At present Wireshark copies Context/128 and then overwrites it.
|
||||
* (Setting Context 0 to aaaa::1111:2222:3333:4444 will report a 16 bit compressed address of aaaa::1111:22ff:fe33:xxxx)
|
||||
*
|
||||
* Note the IPCMV6 checksum verification depends on the correct uncompressed addresses.
|
||||
*/
|
||||
|
||||
#if 0
|
||||
/* Mode 1 - 64 bits inline */
|
||||
uip_ip6addr(&server_ipaddr, 0xaaaa, 0, 0, 0, 0, 0, 0, 1);
|
||||
#elif 1
|
||||
/* Mode 2 - 16 bits inline */
|
||||
uip_ip6addr(&server_ipaddr, 0xaaaa, 0, 0, 0, 0, 0x00ff, 0xfe00, 1);
|
||||
#else
|
||||
/* Mode 3 - derived from server link-local (MAC) address */
|
||||
uip_ip6addr(&server_ipaddr, 0xaaaa, 0, 0, 0, 0x0250, 0xc2ff, 0xfea8, 0xcd1a); /* redbee-econotag */
|
||||
#endif
|
||||
/* Voravit Added */
|
||||
/* PRINTF("VORAVIT CLIENT: SERVER IPv6 addresses: \n"); */
|
||||
/* PRINT6ADDR(&server_ipaddr); */
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
|
||||
static void
|
||||
generate_random_payload(int type, char *msg)
|
||||
{
|
||||
if(type == 2) { /* /dcdc/vdc */
|
||||
snprintf((char *)msg, 64, "&VG=%d&SL=%d&PMX=%d", (random_rand() % 25) + 1, (random_rand() % 10) + 1, (random_rand() % 100) + 1);
|
||||
} else if(type == 3) { /* /dcdc/hwcfg */
|
||||
snprintf((char *)msg, 64, "&VMX=%d&IMX=%d", (random_rand() % 25) + 1, (random_rand() % 6) + 1);
|
||||
}
|
||||
}
|
||||
/*----------------------------------------------------------------------------*/
|
||||
/*
|
||||
* Handle the response to the observe request and the following notifications
|
||||
*/
|
||||
static void
|
||||
notification_callback(coap_observee_t *obs, void *notification, coap_notification_flag_t flag)
|
||||
{
|
||||
int len = 0;
|
||||
const uint8_t *payload = NULL;
|
||||
|
||||
/* printf("Notification handler\n"); */
|
||||
/* printf("Observee URI: %s\n", obs->url); */
|
||||
if(notification) {
|
||||
len = coap_get_payload(notification, &payload);
|
||||
}
|
||||
switch(flag) {
|
||||
case NOTIFICATION_OK:
|
||||
count_notify++;
|
||||
printf("NOTIFICATION OK: %d\n%*s\n", count_notify, len, (char *)payload);
|
||||
break;
|
||||
case OBSERVE_OK: /* server accepeted observation request */
|
||||
printf("OBSERVE_OK: \n%*s\n", len, (char *)payload);
|
||||
break;
|
||||
case OBSERVE_NOT_SUPPORTED:
|
||||
printf("OBSERVE_NOT_SUPPORTED: \n%*s\n", len, (char *)payload);
|
||||
obs = NULL;
|
||||
break;
|
||||
case ERROR_RESPONSE_CODE:
|
||||
printf("ERROR_RESPONSE_CODE: \n%*s\n", len, (char *)payload);
|
||||
obs = NULL;
|
||||
break;
|
||||
case NO_REPLY_FROM_SERVER:
|
||||
printf("NO_REPLY_FROM_SERVER: "
|
||||
"removing observe registration with token %x%x\n",
|
||||
obs->token[0], obs->token[1]);
|
||||
obs = NULL;
|
||||
break;
|
||||
}
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
/*
|
||||
* Toggle the observation of the remote resource
|
||||
*/
|
||||
void
|
||||
toggle_observation(void)
|
||||
{
|
||||
if(obs) {
|
||||
printf("Stopping observation\n");
|
||||
coap_obs_remove_observee(obs);
|
||||
obs = NULL;
|
||||
} else {
|
||||
printf("Starting observation\n");
|
||||
obs = coap_obs_request_registration(&server_ipaddr, REMOTE_PORT, service_urls[1], notification_callback, NULL);
|
||||
}
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
static int count_get = 0;
|
||||
static int count_put = 0;
|
||||
/*---------------------------------------------------------------------------*/
|
||||
PROCESS_THREAD(coap_client_process, ev, data)
|
||||
{
|
||||
/*
|
||||
#if WITH_COMPOWER
|
||||
static int print = 0;
|
||||
#endif
|
||||
*/
|
||||
PROCESS_BEGIN();
|
||||
|
||||
PROCESS_PAUSE();
|
||||
|
||||
set_global_address();
|
||||
|
||||
PRINTF("CoAP client process started\n");
|
||||
|
||||
print_local_addresses();
|
||||
|
||||
/**************************************************************************/
|
||||
static coap_packet_t request[1]; /* This way the packet can be treated as pointer as usual. */
|
||||
|
||||
/* receives all CoAP messages */
|
||||
coap_init_engine();
|
||||
|
||||
etimer_set(&et, GET_INTERVAL * CLOCK_SECOND);
|
||||
|
||||
while(1) {
|
||||
PROCESS_YIELD();
|
||||
|
||||
if(ev == tcpip_event) {
|
||||
printf("TCPIP_HANDLER\n");
|
||||
tcpip_handler();
|
||||
}
|
||||
|
||||
if(etimer_expired(&et)) {
|
||||
count_get++;
|
||||
|
||||
/*---------------------------------------------------------------------------*/
|
||||
if(count_get < 10) { /* we do normal GET 3 times for each resource */
|
||||
/* TEST GET: looping through the 3 resources: status, vdc, hwcfg */
|
||||
/* Also CoAP GET doesn't need to have a payload */
|
||||
coap_init_message(request, COAP_TYPE_CON, COAP_GET, 0);
|
||||
if(count_get % 3 == 1) {
|
||||
coap_set_header_uri_path(request, service_urls[1]);
|
||||
PRINTF("GET %d: %s\n", count_get, service_urls[1]);
|
||||
} else if(count_get % 3 == 2) {
|
||||
coap_set_header_uri_path(request, service_urls[2]);
|
||||
PRINTF("GET %d: %s\n", count_get, service_urls[2]);
|
||||
} else {
|
||||
coap_set_header_uri_path(request, service_urls[3]);
|
||||
PRINTF("GET %d: %s\n", count_get, service_urls[3]);
|
||||
}
|
||||
|
||||
#if PLATFORM_HAS_LEDS
|
||||
/* set yellow led when sending packet */
|
||||
leds_on(LEDS_YELLOW);
|
||||
#endif
|
||||
COAP_BLOCKING_REQUEST(&server_ipaddr, REMOTE_PORT, request,
|
||||
client_chunk_handler);
|
||||
} /* if (count_get < 10) */
|
||||
/*---------------------------------------------------------------------------*/
|
||||
/* test PUT: vdc and hwcfg on odd and even packet */
|
||||
/* every 10th timer we PUT a resource: vdc and hwcfg alternately */
|
||||
if(count_get % 10 == 0) {
|
||||
/* static char msg[64] = ""; */
|
||||
char msg[64] = "";
|
||||
|
||||
/*---------------------------------------------------------------------------*/
|
||||
/* We read CO2 sensor if it is enable */
|
||||
#ifdef CO2
|
||||
coap_init_message(request, COAP_TYPE_CON, COAP_GET, 0);
|
||||
coap_set_header_uri_path(request, "/dcdc/co2");
|
||||
PRINTF("GET %d: %s\n", count_get, "/dcdc/co2");
|
||||
#if PLATFORM_HAS_LEDS
|
||||
leds_on(LEDS_YELLOW);
|
||||
#endif
|
||||
COAP_BLOCKING_REQUEST(&server_ipaddr, REMOTE_PORT, request,
|
||||
client_chunk_handler);
|
||||
#endif
|
||||
/*---------------------------------------------------------------------------*/
|
||||
|
||||
count_put++;
|
||||
coap_init_message(request, COAP_TYPE_CON, COAP_PUT, 0);
|
||||
|
||||
if(count_put % 2 == 0) {
|
||||
coap_set_header_uri_path(request, service_urls[3]);
|
||||
generate_random_payload(3, msg);
|
||||
coap_set_payload(request, (uint8_t *)msg, sizeof(msg) - 1);
|
||||
PRINTF("PUT %d: %s PAYLOAD: %s\n", count_get, service_urls[3], msg);
|
||||
} else {
|
||||
coap_set_header_uri_path(request, service_urls[2]);
|
||||
generate_random_payload(2, msg);
|
||||
coap_set_payload(request, (uint8_t *)msg, sizeof(msg) - 1);
|
||||
PRINTF("PUT %d: %s PAYLOAD: %s\n", count_get, service_urls[2], msg);
|
||||
}
|
||||
|
||||
#if PLATFORM_HAS_LEDS
|
||||
/* set yellow led when sending packet */
|
||||
leds_on(LEDS_YELLOW);
|
||||
#endif
|
||||
COAP_BLOCKING_REQUEST(&server_ipaddr, REMOTE_PORT, request,
|
||||
client_chunk_handler);
|
||||
|
||||
|
||||
}
|
||||
|
||||
/* after 2 more timeout we do GET to check the resource new value */
|
||||
if((count_get > 10) && ((count_get - 2) % 10 == 0)) {
|
||||
coap_init_message(request, COAP_TYPE_CON, COAP_GET, 0);
|
||||
|
||||
if(count_put % 2 == 0) {
|
||||
coap_set_header_uri_path(request, service_urls[3]);
|
||||
PRINTF("GET %d: %s\n", count_get, service_urls[3]);
|
||||
} else {
|
||||
coap_set_header_uri_path(request, service_urls[2]);
|
||||
PRINTF("GET %d: %s\n", count_get, service_urls[2]);
|
||||
}
|
||||
|
||||
#if PLATFORM_HAS_LEDS
|
||||
/* set yellow led when sending packet */
|
||||
leds_on(LEDS_YELLOW);
|
||||
#endif
|
||||
COAP_BLOCKING_REQUEST(&server_ipaddr, REMOTE_PORT, request,
|
||||
client_chunk_handler);
|
||||
}
|
||||
|
||||
/*---------------------------------------------------------------------------*/
|
||||
|
||||
/* test GET with observe option when timer expires the 15th time */
|
||||
if(count_get == 15) {
|
||||
/* PRINTF("GET %d: OBSERVE: %s\n", count_get, service_urls[2]); */
|
||||
toggle_observation();
|
||||
}
|
||||
|
||||
etimer_reset(&et);
|
||||
}
|
||||
} /* END_WHILE(1) */
|
||||
|
||||
PROCESS_END();
|
||||
}
|
||||
/*---------------------------------------------------------------------------*/
|
||||
Loading…
Add table
Add a link
Reference in a new issue