418 lines
14 KiB
C
418 lines
14 KiB
C
/*
|
|
* 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, UIP_DS6_DEFAULT_PREFIX, 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 6LoWPAN 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 fd00::. At present Wireshark copies Context/128 and
|
|
* then overwrites it.
|
|
* (Setting Context 0 to fd00::1111:2222:3333:4444 will report a 16 bit
|
|
* compressed address of fd00::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, UIP_DS6_DEFAULT_PREFIX, 0, 0, 0, 0, 0, 0, 1);
|
|
#elif 1
|
|
/* Mode 2 - 16 bits inline */
|
|
uip_ip6addr(&server_ipaddr, UIP_DS6_DEFAULT_PREFIX, 0, 0, 0, 0, 0x00ff, 0xfe00, 1);
|
|
#else
|
|
/* Mode 3 - derived from server link-local (MAC) address */
|
|
uip_ip6addr(&server_ipaddr, UIP_DS6_DEFAULT_PREFIX, 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();
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|