blob: 8797fbe86240d04d38accdeb88ff18cfd765b803 [file] [log] [blame]
/* main.c - Application main entry point */
/*
* Copyright (c) 2016 Intel Corporation
*
* SPDX-License-Identifier: Apache-2.0
*/
#include <zephyr/logging/log.h>
LOG_MODULE_REGISTER(net_test, CONFIG_NET_ROUTE_LOG_LEVEL);
#include <zephyr/types.h>
#include <zephyr/ztest.h>
#include <stdbool.h>
#include <stddef.h>
#include <string.h>
#include <errno.h>
#include <zephyr/sys/printk.h>
#include <zephyr/linker/sections.h>
#include <zephyr/random/rand32.h>
#include <zephyr/tc_util.h>
#include <zephyr/net/ethernet.h>
#include <zephyr/net/dummy.h>
#include <zephyr/net/buf.h>
#include <zephyr/net/net_ip.h>
#include <zephyr/net/net_if.h>
#include <zephyr/net/net_context.h>
#define NET_LOG_ENABLED 1
#include "net_private.h"
#include "icmpv6.h"
#include "ipv6.h"
#include "nbr.h"
#include "route.h"
#if defined(CONFIG_NET_ROUTE_LOG_LEVEL_DBG)
#define DBG(fmt, ...) printk(fmt, ##__VA_ARGS__)
#else
#define DBG(fmt, ...)
#endif
static struct net_context *udp_ctx;
/* Interface 1 is the default host and it has my_addr assigned to it */
static struct in6_addr my_addr = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0x1 } } };
/* Interface 2 is the secondary host for peer device with address peer_addr */
static struct in6_addr peer_addr = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0x0b, 0x0e, 0x0e, 0x3 } } };
/* Alternate next hop address for dest_addr */
static struct in6_addr peer_addr_alt = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0x0b, 0x0e, 0x0e, 0x4 } } };
/* The dest_addr is only reachable via peer_addr */
static struct in6_addr dest_addr = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0xd, 0xe, 0x5, 0x7 } } };
/* Extra address is assigned to ll_addr */
static struct in6_addr ll_addr = { { { 0xfe, 0x80, 0x43, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0xf2, 0xaa, 0x29, 0x02,
0x04 } } };
static struct in6_addr in6addr_mcast = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0x1 } } };
/* Generic address that we are using to generate some more addresses */
static struct in6_addr generic_addr = { { { 0x20, 0x01, 0x0d, 0xb8, 0, 0, 0, 0,
0, 0, 0, 0, 0xbe, 0xef, 0, 0 } } };
static struct net_if *recipient;
static struct net_if *my_iface;
static struct net_if *peer_iface;
static struct net_route_entry *entry;
#define MAX_ROUTES CONFIG_NET_MAX_ROUTES
static const int max_routes = MAX_ROUTES;
static struct net_route_entry *test_routes[MAX_ROUTES];
static struct in6_addr dest_addresses[MAX_ROUTES];
static bool test_failed;
static bool data_failure;
static bool feed_data; /* feed data back to IP stack */
static int msg_sending;
K_SEM_DEFINE(wait_data, 0, UINT_MAX);
#define WAIT_TIME K_MSEC(250)
struct net_route_test {
uint8_t mac_addr[sizeof(struct net_eth_addr)];
struct net_linkaddr ll_addr;
};
int net_route_dev_init(const struct device *dev)
{
return 0;
}
static uint8_t *net_route_get_mac(const struct device *dev)
{
struct net_route_test *route = dev->data;
if (route->mac_addr[2] == 0x00) {
/* 00-00-5E-00-53-xx Documentation RFC 7042 */
route->mac_addr[0] = 0x00;
route->mac_addr[1] = 0x00;
route->mac_addr[2] = 0x5E;
route->mac_addr[3] = 0x00;
route->mac_addr[4] = 0x53;
route->mac_addr[5] = sys_rand32_get();
}
route->ll_addr.addr = route->mac_addr;
route->ll_addr.len = 6U;
return route->mac_addr;
}
static void net_route_iface_init(struct net_if *iface)
{
uint8_t *mac = net_route_get_mac(net_if_get_device(iface));
net_if_set_link_addr(iface, mac, sizeof(struct net_eth_addr),
NET_LINK_ETHERNET);
}
static int tester_send(const struct device *dev, struct net_pkt *pkt)
{
if (!pkt->frags) {
TC_ERROR("No data to send!\n");
return -ENODATA;
}
/* By default we assume that the test is ok */
data_failure = false;
if (feed_data) {
DBG("Received at iface %p and feeding it into iface %p\n",
net_pkt_iface(pkt), recipient);
net_pkt_ref(pkt);
if (net_recv_data(recipient, pkt) < 0) {
TC_ERROR("Data receive failed.");
net_pkt_unref(pkt);
test_failed = true;
}
goto out;
}
DBG("pkt %p to be sent len %lu\n", pkt, net_pkt_get_len(pkt));
if (data_failure) {
test_failed = true;
}
msg_sending = 0;
out:
k_sem_give(&wait_data);
return 0;
}
static int tester_send_peer(const struct device *dev, struct net_pkt *pkt)
{
if (!pkt->frags) {
TC_ERROR("No data to send!\n");
return -ENODATA;
}
/* By default we assume that the test is ok */
data_failure = false;
if (feed_data) {
DBG("Received at iface %p and feeding it into iface %p\n",
net_pkt_iface(pkt), recipient);
net_pkt_ref(pkt);
if (net_recv_data(recipient, pkt) < 0) {
TC_ERROR("Data receive failed.");
net_pkt_unref(pkt);
test_failed = true;
}
goto out;
}
DBG("pkt %p to be sent len %lu\n", pkt, net_pkt_get_len(pkt));
if (data_failure) {
test_failed = true;
}
msg_sending = 0;
out:
k_sem_give(&wait_data);
return 0;
}
struct net_route_test net_route_data;
struct net_route_test net_route_data_peer;
static struct dummy_api net_route_if_api = {
.iface_api.init = net_route_iface_init,
.send = tester_send,
};
static struct dummy_api net_route_if_api_peer = {
.iface_api.init = net_route_iface_init,
.send = tester_send_peer,
};
#define _ETH_L2_LAYER DUMMY_L2
#define _ETH_L2_CTX_TYPE NET_L2_GET_CTX_TYPE(DUMMY_L2)
NET_DEVICE_INIT_INSTANCE(net_route_test, "net_route_test", host,
net_route_dev_init, NULL,
&net_route_data, NULL,
CONFIG_KERNEL_INIT_PRIORITY_DEFAULT,
&net_route_if_api, _ETH_L2_LAYER,
_ETH_L2_CTX_TYPE, 127);
NET_DEVICE_INIT_INSTANCE(net_route_test_peer, "net_route_test_peer", peer,
net_route_dev_init, NULL,
&net_route_data_peer, NULL,
CONFIG_KERNEL_INIT_PRIORITY_DEFAULT,
&net_route_if_api_peer, _ETH_L2_LAYER,
_ETH_L2_CTX_TYPE, 127);
static void test_init(void)
{
struct net_if_mcast_addr *maddr;
struct net_if_addr *ifaddr;
int i;
my_iface = net_if_get_first_by_type(&NET_L2_GET_NAME(DUMMY));
peer_iface = net_if_get_first_by_type(&NET_L2_GET_NAME(DUMMY)) + 1;
DBG("Interfaces: [%d] my %p, [%d] peer %p\n",
net_if_get_by_iface(my_iface), my_iface,
net_if_get_by_iface(peer_iface), peer_iface);
zassert_not_null(my_iface,
"Interface is NULL");
zassert_not_null(peer_iface,
"Interface is NULL");
ifaddr = net_if_ipv6_addr_add(my_iface, &my_addr,
NET_ADDR_MANUAL, 0);
zassert_not_null(ifaddr,
"Cannot add IPv6 address");
/* For testing purposes we need to set the addresses preferred */
ifaddr->addr_state = NET_ADDR_PREFERRED;
ifaddr = net_if_ipv6_addr_add(my_iface, &ll_addr,
NET_ADDR_MANUAL, 0);
zassert_not_null(ifaddr,
"Cannot add IPv6 address");
ifaddr->addr_state = NET_ADDR_PREFERRED;
net_ipv6_addr_create(&in6addr_mcast, 0xff02, 0, 0, 0, 0, 0, 0, 0x0001);
maddr = net_if_ipv6_maddr_add(my_iface, &in6addr_mcast);
zassert_not_null(maddr,
"Cannot add multicast IPv6 address");
/* The peer and dest interfaces are just simulated, they are not
* really used so we should not add IP addresses for them.
*/
/* Some test addresses are generated */
for (i = 0; i < max_routes; i++) {
memcpy(&dest_addresses[i], &generic_addr,
sizeof(struct in6_addr));
dest_addresses[i].s6_addr[14] = i + 1;
dest_addresses[i].s6_addr[15] = sys_rand32_get();
}
}
static void test_net_ctx_create(void)
{
int ret;
ret = net_context_get(AF_INET6, SOCK_DGRAM, IPPROTO_UDP,
&udp_ctx);
zassert_equal(ret, 0,
"Context create IPv6 UDP test failed");
}
static bool net_test_send_ns(struct net_if *iface,
struct in6_addr *addr)
{
int ret;
ret = net_ipv6_send_ns(iface,
NULL,
addr,
&my_addr,
&my_addr,
false);
if (ret < 0) {
TC_ERROR("Cannot send NS (%d)\n", ret);
return false;
}
return true;
}
static bool net_test_nbr_lookup_ok(struct net_if *iface,
struct in6_addr *addr)
{
struct net_nbr *nbr;
nbr = net_ipv6_nbr_lookup(iface, addr);
if (!nbr) {
TC_ERROR("Neighbor %s not found in cache\n",
net_sprint_ipv6_addr(addr));
return false;
}
return true;
}
static void test_populate_nbr_cache(void)
{
struct net_nbr *nbr;
msg_sending = NET_ICMPV6_NS;
feed_data = true;
data_failure = false;
recipient = my_iface;
zassert_true(net_test_send_ns(peer_iface, &peer_addr));
nbr = net_ipv6_nbr_add(net_if_get_first_by_type(&NET_L2_GET_NAME(DUMMY)),
&peer_addr,
&net_route_data_peer.ll_addr,
false,
NET_IPV6_NBR_STATE_REACHABLE);
zassert_not_null(nbr, "Cannot add peer to neighbor cache");
zassert_true(net_test_send_ns(peer_iface, &peer_addr_alt));
nbr = net_ipv6_nbr_add(net_if_get_first_by_type(&NET_L2_GET_NAME(DUMMY)),
&peer_addr_alt,
&net_route_data_peer.ll_addr,
false,
NET_IPV6_NBR_STATE_REACHABLE);
zassert_not_null(nbr, "Cannot add peer to neighbor cache");
k_sem_take(&wait_data, WAIT_TIME);
feed_data = false;
zassert_false(data_failure, "data failure");
data_failure = false;
zassert_true(net_test_nbr_lookup_ok(my_iface, &peer_addr));
}
static void test_route_add(void)
{
entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_not_null(entry, "Route add failed");
}
static void test_route_update(void)
{
struct net_route_entry *update_entry;
update_entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_equal_ptr(update_entry, entry,
"Route add again failed");
}
static void test_route_del(void)
{
int ret;
ret = net_route_del(entry);
if (ret < 0) {
zassert_true(0, "Route del failed");
}
}
static void test_route_del_again(void)
{
int ret;
ret = net_route_del(entry);
if (ret >= 0) {
zassert_true(0, "Route del again failed");
}
}
static void test_route_get_nexthop(void)
{
struct in6_addr *nexthop;
nexthop = net_route_get_nexthop(entry);
zassert_not_null(nexthop, "Route get nexthop failed");
zassert_true(net_ipv6_addr_cmp(nexthop, &peer_addr),
"Route nexthop does not match");
}
static void test_route_lookup_ok(void)
{
struct net_route_entry *entry;
entry = net_route_lookup(my_iface, &dest_addr);
zassert_not_null(entry,
"Route lookup failed");
}
static void test_route_lookup_fail(void)
{
struct net_route_entry *entry;
entry = net_route_lookup(my_iface, &peer_addr);
zassert_is_null(entry,
"Route lookup failed for peer address");
}
static void test_route_del_nexthop(void)
{
struct in6_addr *nexthop = &peer_addr;
int ret;
ret = net_route_del_by_nexthop(my_iface, nexthop);
zassert_false((ret <= 0), "Route del nexthop failed");
}
static void test_route_del_nexthop_again(void)
{
struct in6_addr *nexthop = &peer_addr;
int ret;
ret = net_route_del_by_nexthop(my_iface, nexthop);
zassert_false((ret >= 0), "Route del again nexthop failed");
}
static void test_route_add_many(void)
{
int i;
for (i = 0; i < max_routes; i++) {
DBG("Adding route %d addr %s\n", i + 1,
net_sprint_ipv6_addr(&dest_addresses[i]));
test_routes[i] = net_route_add(my_iface,
&dest_addresses[i], 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_not_null(test_routes[i], "Route add failed");
}
}
static void test_route_del_many(void)
{
int i;
for (i = 0; i < max_routes; i++) {
DBG("Deleting route %d addr %s\n", i + 1,
net_sprint_ipv6_addr(&dest_addresses[i]));
zassert_false(net_route_del(test_routes[i]),
" Route del failed");
}
}
static void test_route_lifetime(void)
{
entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_not_null(entry, "Route add failed");
entry = net_route_lookup(my_iface, &dest_addr);
zassert_not_null(entry, "Route not found");
net_route_update_lifetime(entry, 1);
k_sleep(K_MSEC(1200));
entry = net_route_lookup(my_iface, &dest_addr);
zassert_is_null(entry, "Route did not expire");
}
static void test_route_preference(void)
{
struct net_route_entry *update_entry;
entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_not_null(entry, "Route add failed");
update_entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr_alt,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_MEDIUM);
zassert_equal_ptr(update_entry, entry,
"Route add again failed");
update_entry = net_route_add(my_iface,
&dest_addr, 128,
&peer_addr,
NET_IPV6_ND_INFINITE_LIFETIME,
NET_ROUTE_PREFERENCE_LOW);
zassert_is_null(update_entry,
"Low preference route overwritten medium one");
net_route_del(entry);
}
/*test case main entry*/
ZTEST(route_test_suite, test_route)
{
test_init();
test_net_ctx_create();
test_populate_nbr_cache();
test_route_add();
test_route_update();
test_route_get_nexthop();
test_route_lookup_ok();
test_route_lookup_fail();
test_route_del();
test_route_add();
test_route_del_nexthop();
test_route_del_again();
test_route_del_nexthop_again();
test_populate_nbr_cache();
test_route_add_many();
test_route_del_many();
test_route_lifetime();
test_route_preference();
}
ZTEST_SUITE(route_test_suite, NULL, NULL, NULL, NULL, NULL);