/*---------------------------------------------------------------------------*/
void
rpl_remove_routes(rpl_dag_t *dag)
{
uip_ds6_route_t *r;
#if RPL_CONF_MULTICAST
uip_mcast6_route_t *mcast_route;
#endif
r = uip_ds6_route_head();
while(r != NULL) {
if(r->state.dag == dag) {
uip_ds6_route_rm(r);
r = uip_ds6_route_head();
} else {
r = uip_ds6_route_next(r);
}
}
#if RPL_CONF_MULTICAST
mcast_route = uip_mcast6_route_list_head();
while(mcast_route != NULL) {
if(mcast_route->dag == dag) {
uip_mcast6_route_rm(mcast_route);
mcast_route = uip_mcast6_route_list_head();
} else {
mcast_route = list_item_next(mcast_route);
}
}
#endif
}
/*---------------------------------------------------------------------------*/
static void
handle_dao_timer(struct net_buf *not_used, void *ptr)
{
rpl_instance_t *instance;
#if RPL_CONF_MULTICAST
uip_mcast6_route_t *mcast_route;
uint8_t i;
#endif
instance = (rpl_instance_t *)ptr;
if(!dio_send_ok && uip_ds6_get_link_local(ADDR_PREFERRED) == NULL) {
PRINTF("RPL: Postpone DAO transmission\n");
ctimer_set(NULL, &instance->dao_timer, CLOCK_SECOND, handle_dao_timer, instance);
return;
}
/* Send the DAO to the DAO parent set -- the preferred parent in our case. */
if(instance->current_dag->preferred_parent != NULL) {
PRINTF("RPL: handle_dao_timer - sending DAO\n");
/* Set the route lifetime to the default value. */
dao_output(instance->current_dag->preferred_parent,
instance->default_lifetime);
#if RPL_CONF_MULTICAST
/* Send DAOs for multicast prefixes only if the instance is in MOP 3 */
if(instance->mop == RPL_MOP_STORING_MULTICAST) {
/* Send a DAO for own multicast addresses */
for(i = 0; i < UIP_DS6_MADDR_NB; i++) {
if(uip_ds6_if.maddr_list[i].isused
&& uip_is_addr_mcast_global(&uip_ds6_if.maddr_list[i].ipaddr)) {
dao_output_target(instance->current_dag->preferred_parent,
&uip_ds6_if.maddr_list[i].ipaddr,
RPL_MCAST_LIFETIME);
}
}
/* Iterate over multicast routes and send DAOs */
mcast_route = uip_mcast6_route_list_head();
while(mcast_route != NULL) {
/* Don't send if it's also our own address, done that already */
if(uip_ds6_maddr_lookup(&mcast_route->group) == NULL) {
dao_output_target(instance->current_dag->preferred_parent,
&mcast_route->group, RPL_MCAST_LIFETIME);
}
mcast_route = list_item_next(mcast_route);
}
}
#endif
} else {
PRINTF("RPL: No suitable DAO parent\n");
}
ctimer_stop(&instance->dao_timer);
if(etimer_expired(&instance->dao_lifetime_timer.etimer)) {
set_dao_lifetime_timer(instance);
}
}
/*---------------------------------------------------------------------------*/
void
rpl_purge_routes(void)
{
uip_ds6_route_t *r;
uip_ipaddr_t prefix;
rpl_dag_t *dag;
#if RPL_CONF_MULTICAST
uip_mcast6_route_t *mcast_route;
#endif
/* First pass, decrement lifetime */
r = uip_ds6_route_head();
while(r != NULL) {
if(r->state.lifetime >= 1) {
/*
* If a route is at lifetime == 1, set it to 0, scheduling it for
* immediate removal below. This achieves the same as the original code,
* which would delete lifetime <= 1
*/
r->state.lifetime--;
}
r = uip_ds6_route_next(r);
}
/* Second pass, remove dead routes */
r = uip_ds6_route_head();
while(r != NULL) {
if(r->state.lifetime < 1) {
/* Routes with lifetime == 1 have only just been decremented from 2 to 1,
* thus we want to keep them. Hence < and not <= */
uip_ipaddr_copy(&prefix, &r->ipaddr);
uip_ds6_route_rm(r);
r = uip_ds6_route_head();
PRINTF("No more routes to ");
PRINT6ADDR(&prefix);
dag = default_instance->current_dag;
/* Propagate this information with a No-Path DAO to preferred parent if we are not a RPL Root */
if(dag->rank != ROOT_RANK(default_instance)) {
PRINTF(" -> generate No-Path DAO\n");
dao_output_target(dag->preferred_parent, &prefix, RPL_ZERO_LIFETIME);
/* Don't schedule more than 1 No-Path DAO, let next iteration handle that */
return;
}
PRINTF("\n");
} else {
r = uip_ds6_route_next(r);
}
}
#if RPL_CONF_MULTICAST
mcast_route = uip_mcast6_route_list_head();
while(mcast_route != NULL) {
if(mcast_route->lifetime <= 1) {
uip_mcast6_route_rm(mcast_route);
mcast_route = uip_mcast6_route_list_head();
} else {
mcast_route->lifetime--;
mcast_route = list_item_next(mcast_route);
}
}
#endif
}
static
PT_THREAD(generate_network(struct httpd_state *s))
{
static int i;
static uip_ds6_route_t *r;
static uip_ds6_defrt_t *dr;
static uip_ds6_nbr_t *nbr;
#if CETIC_6LBR_WITH_MULTICAST
static uip_mcast6_route_t *mcast_route;
#endif
#if RPL_WITH_NON_STORING
static rpl_ns_node_t *link;
#endif
PSOCK_BEGIN(&s->sout);
add("<br /><h2>Addresses</h2><pre>");
SEND_STRING(&s->sout, buf);
reset_buf();
for(i = 0; i < UIP_DS6_ADDR_NB; i++) {
if(uip_ds6_if.addr_list[i].isused) {
ipaddr_add(&uip_ds6_if.addr_list[i].ipaddr);
add(" ");
add_address_type(uip_ds6_if.addr_list[i].type);
add(" ");
add_address_state(uip_ds6_if.addr_list[i].state);
if(!uip_ds6_if.addr_list[i].isinfinite) {
add(" %u s", stimer_remaining(&uip_ds6_if.addr_list[i].vlifetime));
}
add("\n");
SEND_STRING(&s->sout, buf);
reset_buf();
}
}
add("</pre><h2>Multicast groups</h2><pre>");
for(i = 0; i < UIP_DS6_MADDR_NB; i++) {
if(uip_ds6_if.maddr_list[i].isused) {
ipaddr_add(&uip_ds6_if.maddr_list[i].ipaddr);
add("\n");
SEND_STRING(&s->sout, buf);
reset_buf();
}
}
add("</pre><h2>Prefixes</h2><pre>");
for(i = 0; i < UIP_DS6_PREFIX_NB; i++) {
if(uip_ds6_prefix_list[i].isused) {
ipaddr_add(&uip_ds6_prefix_list[i].ipaddr);
#if UIP_CONF_ROUTER
if(uip_ds6_prefix_list[i].advertise) {
add(" Adv");
}
#else
if(uip_ds6_prefix_list[i].isinfinite) {
add(" Inf");
}
#endif
add("\n");
}
}
SEND_STRING(&s->sout, buf);
reset_buf();
#if CETIC_6LBR_WITH_IP64
if((nvm_data.global_flags & CETIC_GLOBAL_IP64) != 0) {
add("</pre><h2>IP64</h2><pre>");
if((nvm_data.eth_ip64_flags & CETIC_6LBR_IP64_DHCP) == 0 || ip64_hostaddr_is_configured()) {
add("Address : ");
ip4addr_add(ip64_get_hostaddr());
add("<br />");
add("Netmask : ");
ip4addr_add(ip64_get_netmask());
add("<br />");
add("Gateway : ");
ip4addr_add(ip64_get_draddr());
add("<br />");
if((nvm_data.eth_ip64_flags & CETIC_6LBR_IP64_DHCP) != 0) {
add("DHCP Server : ");
ip4addr_add_u8(cetic_6lbr_ip64_dhcp_state->serverid);
add("<br />");
add("DHCP lease time : %d s<br />",
uip_ntohs(cetic_6lbr_ip64_dhcp_state->lease_time[0])*65536ul + uip_ntohs(cetic_6lbr_ip64_dhcp_state->lease_time[1]));
}
} else {
add("Waiting configuration<br />");
}
SEND_STRING(&s->sout, buf);
reset_buf();
}
#endif
add("</pre><h2>Neighbors</h2><pre>");
for(nbr = nbr_table_head(ds6_neighbors);
nbr != NULL;
nbr = nbr_table_next(ds6_neighbors, nbr)) {
if ((nvm_data.global_flags & CETIC_GLOBAL_DISABLE_CONFIG) == 0) {
add("[<a href=\"nbr-rm?");
ipaddr_add(&nbr->ipaddr);
add("\">del</a>] ");
}
#if CETIC_6LBR_NODE_CONFIG_HAS_NAME
if ( node_config_loaded ) {
add("%s : ", node_config_get_name(node_config_find_by_lladdr(uip_ds6_nbr_get_ll(nbr))));
}
#endif
ipaddr_add(&nbr->ipaddr);
add(" ");
lladdr_add(uip_ds6_nbr_get_ll(nbr));
add(" ");
add_network_cases(nbr->state);
#if UIP_SWITCH_LOOKUP
if(nbr->ifindex != NETWORK_ITF_UNKNOWN) {
add(" if:%u", nbr->ifindex);
}
#endif
add("\n");
SEND_STRING(&s->sout, buf);
reset_buf();
}
add("</pre><h2>Routes</h2><pre>");
SEND_STRING(&s->sout, buf);
reset_buf();
for(r = uip_ds6_route_head(), i = 0; r != NULL;
r = uip_ds6_route_next(r), ++i) {
if ((nvm_data.global_flags & CETIC_GLOBAL_DISABLE_CONFIG) == 0) {
add("[<a href=\"route-rm?");
ipaddr_add(&r->ipaddr);
add("\">del</a>] ");
}
#if CETIC_6LBR_NODE_CONFIG_HAS_NAME
if ( node_config_loaded ) {
add("%s (", node_config_get_name(node_config_find_by_ip(&r->ipaddr)));
ipaddr_add(&r->ipaddr);
add("/%u) via ", r->length);
} else {
ipaddr_add(&r->ipaddr);
add("/%u via ", r->length);
}
if ( node_config_loaded ) {
add("%s (", node_config_get_name(node_config_find_by_ip(uip_ds6_route_nexthop(r))));
ipaddr_add(uip_ds6_route_nexthop(r));
add(")");
} else {
ipaddr_add(uip_ds6_route_nexthop(r));
}
#else
ipaddr_add(&r->ipaddr);
add("/%u via ", r->length);
ipaddr_add(uip_ds6_route_nexthop(r));
#endif
#if CETIC_6LBR_WITH_RPL
if(r->state.lifetime != RPL_ROUTE_INFINITE_LIFETIME) {
#else
if(r->neighbor_routes != NULL) {
#endif
add(" %lu s\n", r->state.lifetime);
} else {
add("Inf\n");
}
SEND_STRING(&s->sout, buf);
reset_buf();
}
#if RPL_WITH_NON_STORING
add("</pre><h2>Links</h2><pre>");
for(link = rpl_ns_node_head(); link != NULL; link = rpl_ns_node_next(link)) {
if(link->parent != NULL) {
uip_ipaddr_t child_ipaddr;
uip_ipaddr_t parent_ipaddr;
rpl_ns_get_node_global_addr(&child_ipaddr, link);
rpl_ns_get_node_global_addr(&parent_ipaddr, link->parent);
#if CETIC_6LBR_NODE_CONFIG_HAS_NAME
if ( node_config_loaded ) {
add("%s (", node_config_get_name(node_config_find_by_ip(&child_ipaddr)));
ipaddr_add(&child_ipaddr);
add(") via ");
} else {
ipaddr_add(&child_ipaddr);
add(" via ");
}
if ( node_config_loaded ) {
add("%s (", node_config_get_name(node_config_find_by_ip(&parent_ipaddr)));
ipaddr_add(&parent_ipaddr);
add(")");
} else {
ipaddr_add(&parent_ipaddr);
}
#else
ipaddr_add(&child_ipaddr);
add(" via ");
ipaddr_add(&parent_ipaddr);
#endif
add(" %lu s\n", link->lifetime);
SEND_STRING(&s->sout, buf);
reset_buf();
}
}
#endif
#if CETIC_6LBR_WITH_MULTICAST
add("</pre><h2>Routed multicast groups</h2><pre>");
for(mcast_route = uip_mcast6_route_list_head(), i = 0; mcast_route != NULL;
mcast_route = list_item_next(mcast_route), ++i) {
if ((nvm_data.global_flags & CETIC_GLOBAL_DISABLE_CONFIG) == 0) {
add("[<a href=\"mcast-rm?");
ipaddr_add(&mcast_route->group);
add("\">del</a>] ");
}
ipaddr_add(&mcast_route->group);
add(" %lu s\n", mcast_route->lifetime);
SEND_STRING(&s->sout, buf);
reset_buf();
}
#endif
add("</pre><h2>Default Routers</h2><pre>");
for(dr = uip_ds6_defrt_head(); dr != NULL; dr = list_item_next(r)) {
ipaddr_add(&dr->ipaddr);
if(dr->isinfinite) {
add(" Inf");
} else {
add(" %u s", stimer_remaining(&dr->lifetime));
}
add("\n");
SEND_STRING(&s->sout, buf);
reset_buf();
}
#if UIP_CONF_DS6_ROUTE_INFORMATION
add("</pre><h2>Route info</h2><pre>");
for(i = 0; i < UIP_DS6_ROUTE_INFO_NB; i++) {
if(uip_ds6_route_info_list[i].isused) {
ipaddr_add(&uip_ds6_route_info_list[i].ipaddr);
add("/%u (%x) %u s\n", uip_ds6_route_info_list[i].length,
uip_ds6_route_info_list[i].flags,
uip_ds6_route_info_list[i].lifetime);
}
}
SEND_STRING(&s->sout, buf);
reset_buf();
#endif
add("</pre><h2>DNS server</h2><pre>");
//Note: Currently we assume only one DNS server
uip_ipaddr_t * dns = uip_nameserver_get(0);
if(!uip_is_addr_unspecified(dns)) {
ipaddr_add(dns);
add(" %u s\n", uip_nameserver_next_expiration());
}
SEND_STRING(&s->sout, buf);
reset_buf();
#if CETIC_6LBR_WITH_IP64
if((nvm_data.global_flags & CETIC_GLOBAL_IP64) != 0) {
add("</pre><h2>IP64 connections mapping</h2><pre>");
static struct ip64_addrmap_entry *m;
for(m = ip64_addrmap_list();
m != NULL;
m = list_item_next(m)) {
if(timer_expired(&m->timer)) continue;
ipaddr_add(&m->ip6addr);
add("%%%d (%d)", m->ip6port, m->protocol);
if(m->ip6to4 && m->ip4to6) {
add(" <-> ");
} else if(m->ip6to4) {
add(" -> ");
} else {
add(" <- ");
}
ip4addr_add(&m->ip4addr);
add("%%%d : %d (%x) %us\n", m->ip4port, m->mapped_port,
m->flags, (m->timer.interval - (clock_time() - m->timer.start)) / CLOCK_SECOND);
SEND_STRING(&s->sout, buf);
reset_buf();
}
}
#endif
#if SICSLOWPAN_CONF_MAX_ADDR_CONTEXTS > 0
add("</pre><h2>6LoWPAN Prefix contexts</h2><pre>");
for(i = 0; i < SICSLOWPAN_CONF_MAX_ADDR_CONTEXTS; i++) {
if(addr_contexts[i].used == 1) {
add("%d : ", addr_contexts[i].number);
ipaddr_add_u8_len(addr_contexts[i].prefix, 8);
add("\n");
}
}
add("</pre><br />");
SEND_STRING(&s->sout, buf);
reset_buf();
#endif
#if CETIC_6LBR_TRANSPARENTBRIDGE
add("<h2>HW Prefixes cache</h2><pre>");
for(i = 0; i < prefixCounter; i++) {
add("%02x:%02x:%02x\n", prefixBuffer[i][0], prefixBuffer[i][1],
prefixBuffer[i][2]);
}
SEND_STRING(&s->sout, buf);
add("</pre><br />");
reset_buf();
#endif
PSOCK_END(&s->sout);
}
static void
add_network_cases(const uint8_t state)
{
switch (state) {
case NBR_INCOMPLETE:
add("Incomplete");
break;
case NBR_REACHABLE:
add("Reachable");
break;
case NBR_STALE:
add("Stale");
break;
case NBR_DELAY:
add("Delay");
break;
case NBR_PROBE:
add("Probe");
break;
}
}
static httpd_cgi_call_t *
webserver_network_route_add(struct httpd_state *s)
{
#if UIP_DS6_STATIC_ROUTES
uip_ds6_route_t *route;
uip_ipaddr_t ipaddr;
uint8_t length;
uip_ipaddr_t nexthop;
char *p;
char *sep;
webserver_result_title = "Network";
webserver_result_text = "Add route: Route not created";
do {
if(!s->query) break;
p = s->query;
sep = index(p, '=');
if(sep == NULL) break;
*sep = 0;
if(strcmp(p, "target") != 0) break;
p = sep + 1;
sep = index(p, '&');
if(sep == NULL) break;
*sep = 0;
if(uiplib_ipaddrconv(p, &ipaddr) == 0) break;
p = sep + 1;
sep = index(p, '=');
if(sep == NULL) break;
*sep = 0;
if(strcmp(p, "length") != 0) break;
p = sep + 1;
sep = index(p, '&');
if(sep == NULL) break;
*sep = 0;
length = atoi(p);
p = sep + 1;
sep = index(p, '=');
if(sep == NULL) break;
*sep = 0;
if(strcmp(p, "nexthop") != 0) break;
p = sep + 1;
if(uiplib_ipaddrconv(p, &nexthop) == 0) break;
route = uip_ds6_route_add_static(&ipaddr, length, &nexthop);
if(route) {
webserver_result_text = "Route created";
}
} while (0);
#else
webserver_result_title = "Network";
webserver_result_text = "Add route: not supported";
#endif
return &webserver_result_page;
}
