591766e663
* Loop detection and untangling. Now uses in-band loop detection that works. * Link quality estimation. Now starts with a conservative / pessimistic estimate for new links. * Retransmissions. MAC layer and network layer retransmissions are now decoupled. * Loss handling. Deals better with losses now. * Concurrent applications. Each connection now maintains its own neighbor table with separated cost to sink estimates for each connection.
350 lines
11 KiB
C
350 lines
11 KiB
C
/**
|
|
* \addtogroup rimecollect_neighbor
|
|
* @{
|
|
*/
|
|
|
|
/*
|
|
* Copyright (c) 2006, Swedish Institute of Computer Science.
|
|
* 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 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.
|
|
*
|
|
* $Id: collect-neighbor.c,v 1.5 2010/09/13 13:28:14 adamdunkels Exp $
|
|
*/
|
|
|
|
/**
|
|
* \file
|
|
* Radio neighborhood management
|
|
* \author
|
|
* Adam Dunkels <adam@sics.se>
|
|
*/
|
|
|
|
#include <limits.h>
|
|
#include <stdio.h>
|
|
|
|
#include "contiki.h"
|
|
#include "lib/memb.h"
|
|
#include "lib/list.h"
|
|
|
|
#include "net/rime/collect-neighbor.h"
|
|
#include "net/rime/collect.h"
|
|
|
|
#ifdef COLLECT_NEIGHBOR_CONF_MAX_COLLECT_NEIGHBORS
|
|
#define MAX_COLLECT_NEIGHBORS COLLECT_NEIGHBOR_CONF_MAX_COLLECT_NEIGHBORS
|
|
#else /* COLLECT_NEIGHBOR_CONF_MAX_COLLECT_NEIGHBORS */
|
|
#define MAX_COLLECT_NEIGHBORS 8
|
|
#endif /* COLLECT_NEIGHBOR_CONF_MAX_COLLECT_NEIGHBORS */
|
|
|
|
#define RTMETRIC_MAX COLLECT_MAX_DEPTH
|
|
|
|
MEMB(collect_neighbors_mem, struct collect_neighbor, MAX_COLLECT_NEIGHBORS);
|
|
|
|
static int max_time = 2400;
|
|
|
|
#define DEBUG 0
|
|
#if DEBUG
|
|
#include <stdio.h>
|
|
#define PRINTF(...) printf(__VA_ARGS__)
|
|
#else
|
|
#define PRINTF(...)
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
static void
|
|
periodic(void *ptr)
|
|
{
|
|
struct collect_neighbor_list *neighbor_list;
|
|
struct collect_neighbor *n, *next;
|
|
|
|
neighbor_list = ptr;
|
|
|
|
/* Go through all collect_neighbors and remove old ones. */
|
|
for(n = list_head(neighbor_list->list); n != NULL; n = next) {
|
|
next = NULL;
|
|
if(!rimeaddr_cmp(&n->addr, &rimeaddr_null) &&
|
|
n->time < max_time) {
|
|
n->time++;
|
|
if(n->time == max_time) {
|
|
n->rtmetric = RTMETRIC_MAX;
|
|
PRINTF("%d.%d: removing old collect_neighbor %d.%d\n",
|
|
rimeaddr_node_addr.u8[0],rimeaddr_node_addr.u8[1],
|
|
n->addr.u8[0], n->addr.u8[1]);
|
|
rimeaddr_copy(&n->addr, &rimeaddr_null);
|
|
next = list_item_next(n);
|
|
list_remove(neighbor_list->list, n);
|
|
memb_free(&collect_neighbors_mem, n);
|
|
}
|
|
}
|
|
if(next == NULL) {
|
|
next = list_item_next(n);
|
|
}
|
|
}
|
|
ctimer_set(&neighbor_list->periodic, CLOCK_SECOND, periodic, neighbor_list);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_init(void)
|
|
{
|
|
static uint8_t initialized = 0;
|
|
if(initialized == 0) {
|
|
initialized = 1;
|
|
memb_init(&collect_neighbors_mem);
|
|
}
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_list_new(struct collect_neighbor_list *neighbors_list)
|
|
{
|
|
LIST_STRUCT_INIT(neighbors_list, list);
|
|
list_init(neighbors_list->list);
|
|
ctimer_set(&neighbors_list->periodic, CLOCK_SECOND, periodic, neighbors_list);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
struct collect_neighbor *
|
|
collect_neighbor_list_find(struct collect_neighbor_list *neighbors_list,
|
|
const rimeaddr_t *addr)
|
|
{
|
|
struct collect_neighbor *n;
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
if(rimeaddr_cmp(&n->addr, addr)) {
|
|
return n;
|
|
}
|
|
}
|
|
return NULL;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_list_add(struct collect_neighbor_list *neighbors_list,
|
|
const rimeaddr_t *addr, uint8_t nrtmetric)
|
|
{
|
|
uint16_t rtmetric;
|
|
uint16_t le;
|
|
struct collect_neighbor *n, *max;
|
|
|
|
PRINTF("collect_neighbor_add: adding %d.%d\n", addr->u8[0], addr->u8[1]);
|
|
|
|
/* Check if the collect_neighbor is already on the list. */
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
if(rimeaddr_cmp(&n->addr, &rimeaddr_null) ||
|
|
rimeaddr_cmp(&n->addr, addr)) {
|
|
PRINTF("collect_neighbor_add: already on list %d.%d\n",
|
|
addr->u8[0], addr->u8[1]);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* If the collect_neighbor was not on the list, we try to allocate memory
|
|
for it. */
|
|
if(n == NULL) {
|
|
PRINTF("collect_neighbor_add: not on list, allocating %d.%d\n",
|
|
addr->u8[0], addr->u8[1]);
|
|
n = memb_alloc(&collect_neighbors_mem);
|
|
if(n != NULL) {
|
|
list_add(neighbors_list->list, n);
|
|
}
|
|
}
|
|
|
|
/* If we could not allocate memory, we try to recycle an old
|
|
collect_neighbor */
|
|
if(n == NULL) {
|
|
PRINTF("collect_neighbor_add: not on list, not allocated, recycling %d.%d\n",
|
|
addr->u8[0], addr->u8[1]);
|
|
/* Find the first unused entry or the used entry with the highest
|
|
rtmetric and highest link estimate. */
|
|
rtmetric = 0;
|
|
le = 0;
|
|
max = NULL;
|
|
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
if(!rimeaddr_cmp(&n->addr, &rimeaddr_null)) {
|
|
if(n->rtmetric > rtmetric) {
|
|
rtmetric = n->rtmetric;
|
|
le = collect_neighbor_link_estimate(n);
|
|
max = n;
|
|
} else if(n->rtmetric == rtmetric) {
|
|
if(collect_neighbor_link_estimate(n) > le) {
|
|
rtmetric = n->rtmetric;
|
|
le = collect_neighbor_link_estimate(n);
|
|
max = n;
|
|
/* PRINTF("%d: found worst collect_neighbor %d with rtmetric %d, signal %d\n",
|
|
node_id, collect_neighbors[n].nodeid, rtmetric, signal);*/
|
|
}
|
|
}
|
|
}
|
|
}
|
|
n = max;
|
|
}
|
|
|
|
|
|
/* PRINTF("%d: adding collect_neighbor %d with rtmetric %d, signal %d at %d\n",
|
|
node_id, collect_neighbors[n].nodeid, rtmetric, signal, n);*/
|
|
if(n != NULL) {
|
|
n->time = 0;
|
|
rimeaddr_copy(&n->addr, addr);
|
|
n->rtmetric = nrtmetric;
|
|
collect_link_estimate_new(&n->le);
|
|
}
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_list_remove(struct collect_neighbor_list *neighbors_list,
|
|
const rimeaddr_t *addr)
|
|
{
|
|
struct collect_neighbor *n;
|
|
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
if(rimeaddr_cmp(&n->addr, addr)) {
|
|
PRINTF("%d.%d: removing %d.%d\n",
|
|
rimeaddr_node_addr.u8[0], rimeaddr_node_addr.u8[1],
|
|
addr->u8[0], addr->u8[1]);
|
|
rimeaddr_copy(&n->addr, &rimeaddr_null);
|
|
n->rtmetric = RTMETRIC_MAX;
|
|
list_remove(neighbors_list->list, n);
|
|
memb_free(&collect_neighbors_mem, n);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
struct collect_neighbor *
|
|
collect_neighbor_list_best(struct collect_neighbor_list *neighbors_list)
|
|
{
|
|
int found;
|
|
struct collect_neighbor *n, *best;
|
|
uint16_t rtmetric;
|
|
|
|
rtmetric = RTMETRIC_MAX;
|
|
best = NULL;
|
|
found = 0;
|
|
|
|
/* PRINTF("%d: ", node_id);*/
|
|
PRINTF("collect_neighbor_best: ");
|
|
|
|
/* Find the lowest rtmetric. */
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
PRINTF("%d.%d %d+%d=%d, ",
|
|
n->addr.u8[0], n->addr.u8[1],
|
|
n->rtmetric, collect_neighbor_link_estimate(n),
|
|
collect_neighbor_rtmetric(n));
|
|
if(!rimeaddr_cmp(&n->addr, &rimeaddr_null) &&
|
|
rtmetric > collect_neighbor_rtmetric(n)) {
|
|
rtmetric = collect_neighbor_rtmetric(n);
|
|
best = n;
|
|
}
|
|
}
|
|
PRINTF("\n");
|
|
|
|
return best;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
int
|
|
collect_neighbor_list_num(struct collect_neighbor_list *neighbors_list)
|
|
{
|
|
PRINTF("collect_neighbor_num %d\n", list_length(neighbors_list->list));
|
|
return list_length(neighbors_list->list);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
struct collect_neighbor *
|
|
collect_neighbor_list_get(struct collect_neighbor_list *neighbors_list, int num)
|
|
{
|
|
int i;
|
|
struct collect_neighbor *n;
|
|
|
|
PRINTF("collect_neighbor_get %d\n", num);
|
|
|
|
i = 0;
|
|
for(n = list_head(neighbors_list->list); n != NULL; n = list_item_next(n)) {
|
|
if(i == num) {
|
|
PRINTF("collect_neighbor_get found %d.%d\n",
|
|
n->addr.u8[0], n->addr.u8[1]);
|
|
return n;
|
|
}
|
|
i++;
|
|
}
|
|
return NULL;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_list_purge(struct collect_neighbor_list *neighbors_list)
|
|
{
|
|
while(list_head(neighbors_list->list) != NULL) {
|
|
memb_free(&collect_neighbors_mem, list_pop(neighbors_list->list));
|
|
}
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_update_rtmetric(struct collect_neighbor *n, uint8_t rtmetric)
|
|
{
|
|
if(n != NULL) {
|
|
PRINTF("%d.%d: collect_neighbor_update %d.%d rtmetric %d\n",
|
|
rimeaddr_node_addr.u8[0], rimeaddr_node_addr.u8[1],
|
|
n->addr.u8[0], n->addr.u8[1], rtmetric);
|
|
n->rtmetric = rtmetric;
|
|
n->time = 0;
|
|
}
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_tx_fail(struct collect_neighbor *n, uint8_t num_tx)
|
|
{
|
|
collect_link_estimate_update_tx_fail(&n->le, num_tx);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_tx(struct collect_neighbor *n, uint8_t num_tx)
|
|
{
|
|
collect_link_estimate_update_tx(&n->le, num_tx);
|
|
n->time = 0;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_rx(struct collect_neighbor *n)
|
|
{
|
|
collect_link_estimate_update_rx(&n->le);
|
|
n->time = 0;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
int
|
|
collect_neighbor_link_estimate(struct collect_neighbor *n)
|
|
{
|
|
return collect_link_estimate(&n->le);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
int
|
|
collect_neighbor_rtmetric(struct collect_neighbor *n)
|
|
{
|
|
return n->rtmetric + collect_link_estimate(&n->le);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void
|
|
collect_neighbor_set_lifetime(int seconds)
|
|
{
|
|
max_time = seconds;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/** @} */
|