822 lines
20 KiB
Bash
822 lines
20 KiB
Bash
|
#!/bin/bash
|
||
|
|
# SPDX-License-Identifier: GPL-2.0
|
||
|
|
#
|
||
|
|
# author: Andrea Mayer <andrea.mayer@uniroma2.it>
|
||
|
|
#
|
||
|
|
# This script is designed for testing the SRv6 H.L2Encaps.Red behavior.
|
||
|
|
#
|
||
|
|
# Below is depicted the IPv6 network of an operator which offers L2 VPN
|
||
|
|
# services to hosts, enabling them to communicate with each other.
|
||
|
|
# In this example, hosts hs-1 and hs-2 are connected through an L2 VPN service.
|
||
|
|
# Currently, the SRv6 subsystem in Linux allows hosts hs-1 and hs-2 to exchange
|
||
|
|
# full L2 frames as long as they carry IPv4/IPv6.
|
||
|
|
#
|
||
|
|
# Routers rt-1,rt-2,rt-3 and rt-4 implement L2 VPN services
|
||
|
|
# leveraging the SRv6 architecture. The key components for such VPNs are:
|
||
|
|
#
|
||
|
|
# i) The SRv6 H.L2Encaps.Red behavior applies SRv6 Policies on traffic
|
||
|
|
# received by connected hosts, initiating the VPN tunnel. Such a behavior
|
||
|
|
# is an optimization of the SRv6 H.L2Encap aiming to reduce the
|
||
|
|
# length of the SID List carried in the pushed SRH. Specifically, the
|
||
|
|
# H.L2Encaps.Red removes the first SID contained in the SID List (i.e. SRv6
|
||
|
|
# Policy) by storing it into the IPv6 Destination Address. When a SRv6
|
||
|
|
# Policy is made of only one SID, the SRv6 H.L2Encaps.Red behavior omits
|
||
|
|
# the SRH at all and pushes that SID directly into the IPv6 DA;
|
||
|
|
#
|
||
|
|
# ii) The SRv6 End behavior advances the active SID in the SID List
|
||
|
|
# carried by the SRH;
|
||
|
|
#
|
||
|
|
# iii) The SRv6 End.DX2 behavior is used for removing the SRv6 Policy
|
||
|
|
# and, thus, it terminates the VPN tunnel. The decapsulated L2 frame is
|
||
|
|
# sent over the interface connected with the destination host.
|
||
|
|
#
|
||
|
|
# cafe::1 cafe::2
|
||
|
|
# 10.0.0.1 10.0.0.2
|
||
|
|
# +--------+ +--------+
|
||
|
|
# | | | |
|
||
|
|
# | hs-1 | | hs-2 |
|
||
|
|
# | | | |
|
||
|
|
# +---+----+ +--- +---+
|
||
|
|
# cafe::/64 | | cafe::/64
|
||
|
|
# 10.0.0.0/24 | | 10.0.0.0/24
|
||
|
|
# +---+----+ +----+---+
|
||
|
|
# | | fcf0:0:1:2::/64 | |
|
||
|
|
# | rt-1 +-------------------+ rt-2 |
|
||
|
|
# | | | |
|
||
|
|
# +---+----+ +----+---+
|
||
|
|
# | . . |
|
||
|
|
# | fcf0:0:1:3::/64 . |
|
||
|
|
# | . . |
|
||
|
|
# | . . |
|
||
|
|
# fcf0:0:1:4::/64 | . | fcf0:0:2:3::/64
|
||
|
|
# | . . |
|
||
|
|
# | . . |
|
||
|
|
# | fcf0:0:2:4::/64 . |
|
||
|
|
# | . . |
|
||
|
|
# +---+----+ +----+---+
|
||
|
|
# | | | |
|
||
|
|
# | rt-4 +-------------------+ rt-3 |
|
||
|
|
# | | fcf0:0:3:4::/64 | |
|
||
|
|
# +---+----+ +----+---+
|
||
|
|
#
|
||
|
|
#
|
||
|
|
# Every fcf0:0:x:y::/64 network interconnects the SRv6 routers rt-x with rt-y
|
||
|
|
# in the IPv6 operator network.
|
||
|
|
#
|
||
|
|
# Local SID table
|
||
|
|
# ===============
|
||
|
|
#
|
||
|
|
# Each SRv6 router is configured with a Local SID table in which SIDs are
|
||
|
|
# stored. Considering the given SRv6 router rt-x, at least two SIDs are
|
||
|
|
# configured in the Local SID table:
|
||
|
|
#
|
||
|
|
# Local SID table for SRv6 router rt-x
|
||
|
|
# +----------------------------------------------------------+
|
||
|
|
# |fcff:x::e is associated with the SRv6 End behavior |
|
||
|
|
# |fcff:x::d2 is associated with the SRv6 End.DX2 behavior |
|
||
|
|
# +----------------------------------------------------------+
|
||
|
|
#
|
||
|
|
# The fcff::/16 prefix is reserved by the operator for implementing SRv6 VPN
|
||
|
|
# services. Reachability of SIDs is ensured by proper configuration of the IPv6
|
||
|
|
# operator's network and SRv6 routers.
|
||
|
|
#
|
||
|
|
# SRv6 Policies
|
||
|
|
# =============
|
||
|
|
#
|
||
|
|
# An SRv6 ingress router applies SRv6 policies to the traffic received from a
|
||
|
|
# connected host. SRv6 policy enforcement consists of encapsulating the
|
||
|
|
# received traffic into a new IPv6 packet with a given SID List contained in
|
||
|
|
# the SRH.
|
||
|
|
#
|
||
|
|
# L2 VPN between hs-1 and hs-2
|
||
|
|
# ----------------------------
|
||
|
|
#
|
||
|
|
# Hosts hs-1 and hs-2 are connected using a dedicated L2 VPN.
|
||
|
|
# Specifically, packets generated from hs-1 and directed towards hs-2 are
|
||
|
|
# handled by rt-1 which applies the following SRv6 Policies:
|
||
|
|
#
|
||
|
|
# i.a) L2 traffic, SID List=fcff:2::d2
|
||
|
|
#
|
||
|
|
# Policy (i.a) steers tunneled L2 traffic through SRv6 router rt-2.
|
||
|
|
# The H.L2Encaps.Red omits the presence of SRH at all, since the SID List
|
||
|
|
# consists of only one SID (fcff:2::d2) that can be stored directly in the IPv6
|
||
|
|
# DA.
|
||
|
|
#
|
||
|
|
# On the reverse path (i.e. from hs-2 to hs-1), rt-2 applies the following
|
||
|
|
# policies:
|
||
|
|
#
|
||
|
|
# i.b) L2 traffic, SID List=fcff:4::e,fcff:3::e,fcff:1::d2
|
||
|
|
#
|
||
|
|
# Policy (i.b) steers tunneled L2 traffic through the SRv6 routers
|
||
|
|
# rt-4,rt-3,rt2. The H.L2Encaps.Red reduces the SID List in the SRH by removing
|
||
|
|
# the first SID (fcff:4::e) and pushing it into the IPv6 DA.
|
||
|
|
#
|
||
|
|
# In summary:
|
||
|
|
# hs-1->hs-2 |IPv6 DA=fcff:2::d2|eth|...| (i.a)
|
||
|
|
# hs-2->hs-1 |IPv6 DA=fcff:4::e|SRH SIDs=fcff:3::e,fcff:1::d2|eth|...| (i.b)
|
||
|
|
#
|
||
|
|
|
||
|
|
# Kselftest framework requirement - SKIP code is 4.
|
||
|
|
readonly ksft_skip=4
|
||
|
|
|
||
|
|
readonly RDMSUFF="$(mktemp -u XXXXXXXX)"
|
||
|
|
readonly DUMMY_DEVNAME="dum0"
|
||
|
|
readonly RT2HS_DEVNAME="veth-hs"
|
||
|
|
readonly HS_VETH_NAME="veth0"
|
||
|
|
readonly LOCALSID_TABLE_ID=90
|
||
|
|
readonly IPv6_RT_NETWORK=fcf0:0
|
||
|
|
readonly IPv6_HS_NETWORK=cafe
|
||
|
|
readonly IPv4_HS_NETWORK=10.0.0
|
||
|
|
readonly VPN_LOCATOR_SERVICE=fcff
|
||
|
|
readonly MAC_PREFIX=00:00:00:c0:01
|
||
|
|
readonly END_FUNC=000e
|
||
|
|
readonly DX2_FUNC=00d2
|
||
|
|
|
||
|
|
PING_TIMEOUT_SEC=4
|
||
|
|
PAUSE_ON_FAIL=${PAUSE_ON_FAIL:=no}
|
||
|
|
|
||
|
|
# IDs of routers and hosts are initialized during the setup of the testing
|
||
|
|
# network
|
||
|
|
ROUTERS=''
|
||
|
|
HOSTS=''
|
||
|
|
|
||
|
|
SETUP_ERR=1
|
||
|
|
|
||
|
|
ret=${ksft_skip}
|
||
|
|
nsuccess=0
|
||
|
|
nfail=0
|
||
|
|
|
||
|
|
log_test()
|
||
|
|
{
|
||
|
|
local rc="$1"
|
||
|
|
local expected="$2"
|
||
|
|
local msg="$3"
|
||
|
|
|
||
|
|
if [ "${rc}" -eq "${expected}" ]; then
|
||
|
|
nsuccess=$((nsuccess+1))
|
||
|
|
printf "\n TEST: %-60s [ OK ]\n" "${msg}"
|
||
|
|
else
|
||
|
|
ret=1
|
||
|
|
nfail=$((nfail+1))
|
||
|
|
printf "\n TEST: %-60s [FAIL]\n" "${msg}"
|
||
|
|
if [ "${PAUSE_ON_FAIL}" = "yes" ]; then
|
||
|
|
echo
|
||
|
|
echo "hit enter to continue, 'q' to quit"
|
||
|
|
read a
|
||
|
|
[ "$a" = "q" ] && exit 1
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
print_log_test_results()
|
||
|
|
{
|
||
|
|
printf "\nTests passed: %3d\n" "${nsuccess}"
|
||
|
|
printf "Tests failed: %3d\n" "${nfail}"
|
||
|
|
|
||
|
|
# when a test fails, the value of 'ret' is set to 1 (error code).
|
||
|
|
# Conversely, when all tests are passed successfully, the 'ret' value
|
||
|
|
# is set to 0 (success code).
|
||
|
|
if [ "${ret}" -ne 1 ]; then
|
||
|
|
ret=0
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
log_section()
|
||
|
|
{
|
||
|
|
echo
|
||
|
|
echo "################################################################################"
|
||
|
|
echo "TEST SECTION: $*"
|
||
|
|
echo "################################################################################"
|
||
|
|
}
|
||
|
|
|
||
|
|
test_command_or_ksft_skip()
|
||
|
|
{
|
||
|
|
local cmd="$1"
|
||
|
|
|
||
|
|
if [ ! -x "$(command -v "${cmd}")" ]; then
|
||
|
|
echo "SKIP: Could not run test without \"${cmd}\" tool";
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
get_nodename()
|
||
|
|
{
|
||
|
|
local name="$1"
|
||
|
|
|
||
|
|
echo "${name}-${RDMSUFF}"
|
||
|
|
}
|
||
|
|
|
||
|
|
get_rtname()
|
||
|
|
{
|
||
|
|
local rtid="$1"
|
||
|
|
|
||
|
|
get_nodename "rt-${rtid}"
|
||
|
|
}
|
||
|
|
|
||
|
|
get_hsname()
|
||
|
|
{
|
||
|
|
local hsid="$1"
|
||
|
|
|
||
|
|
get_nodename "hs-${hsid}"
|
||
|
|
}
|
||
|
|
|
||
|
|
__create_namespace()
|
||
|
|
{
|
||
|
|
local name="$1"
|
||
|
|
|
||
|
|
ip netns add "${name}"
|
||
|
|
}
|
||
|
|
|
||
|
|
create_router()
|
||
|
|
{
|
||
|
|
local rtid="$1"
|
||
|
|
local nsname
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${rtid}")"
|
||
|
|
|
||
|
|
__create_namespace "${nsname}"
|
||
|
|
}
|
||
|
|
|
||
|
|
create_host()
|
||
|
|
{
|
||
|
|
local hsid="$1"
|
||
|
|
local nsname
|
||
|
|
|
||
|
|
nsname="$(get_hsname "${hsid}")"
|
||
|
|
|
||
|
|
__create_namespace "${nsname}"
|
||
|
|
}
|
||
|
|
|
||
|
|
cleanup()
|
||
|
|
{
|
||
|
|
local nsname
|
||
|
|
local i
|
||
|
|
|
||
|
|
# destroy routers
|
||
|
|
for i in ${ROUTERS}; do
|
||
|
|
nsname="$(get_rtname "${i}")"
|
||
|
|
|
||
|
|
ip netns del "${nsname}" &>/dev/null || true
|
||
|
|
done
|
||
|
|
|
||
|
|
# destroy hosts
|
||
|
|
for i in ${HOSTS}; do
|
||
|
|
nsname="$(get_hsname "${i}")"
|
||
|
|
|
||
|
|
ip netns del "${nsname}" &>/dev/null || true
|
||
|
|
done
|
||
|
|
|
||
|
|
# check whether the setup phase was completed successfully or not. In
|
||
|
|
# case of an error during the setup phase of the testing environment,
|
||
|
|
# the selftest is considered as "skipped".
|
||
|
|
if [ "${SETUP_ERR}" -ne 0 ]; then
|
||
|
|
echo "SKIP: Setting up the testing environment failed"
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
exit "${ret}"
|
||
|
|
}
|
||
|
|
|
||
|
|
add_link_rt_pairs()
|
||
|
|
{
|
||
|
|
local rt="$1"
|
||
|
|
local rt_neighs="$2"
|
||
|
|
local neigh
|
||
|
|
local nsname
|
||
|
|
local neigh_nsname
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${rt}")"
|
||
|
|
|
||
|
|
for neigh in ${rt_neighs}; do
|
||
|
|
neigh_nsname="$(get_rtname "${neigh}")"
|
||
|
|
|
||
|
|
ip link add "veth-rt-${rt}-${neigh}" netns "${nsname}" \
|
||
|
|
type veth peer name "veth-rt-${neigh}-${rt}" \
|
||
|
|
netns "${neigh_nsname}"
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
get_network_prefix()
|
||
|
|
{
|
||
|
|
local rt="$1"
|
||
|
|
local neigh="$2"
|
||
|
|
local p="${rt}"
|
||
|
|
local q="${neigh}"
|
||
|
|
|
||
|
|
if [ "${p}" -gt "${q}" ]; then
|
||
|
|
p="${q}"; q="${rt}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
echo "${IPv6_RT_NETWORK}:${p}:${q}"
|
||
|
|
}
|
||
|
|
|
||
|
|
# Setup the basic networking for the routers
|
||
|
|
setup_rt_networking()
|
||
|
|
{
|
||
|
|
local rt="$1"
|
||
|
|
local rt_neighs="$2"
|
||
|
|
local nsname
|
||
|
|
local net_prefix
|
||
|
|
local devname
|
||
|
|
local neigh
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${rt}")"
|
||
|
|
|
||
|
|
for neigh in ${rt_neighs}; do
|
||
|
|
devname="veth-rt-${rt}-${neigh}"
|
||
|
|
|
||
|
|
net_prefix="$(get_network_prefix "${rt}" "${neigh}")"
|
||
|
|
|
||
|
|
ip -netns "${nsname}" addr \
|
||
|
|
add "${net_prefix}::${rt}/64" dev "${devname}" nodad
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link set "${devname}" up
|
||
|
|
done
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link add "${DUMMY_DEVNAME}" type dummy
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link set "${DUMMY_DEVNAME}" up
|
||
|
|
ip -netns "${nsname}" link set lo up
|
||
|
|
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv6.conf.all.accept_dad=0
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv6.conf.default.accept_dad=0
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv6.conf.all.forwarding=1
|
||
|
|
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv4.conf.all.rp_filter=0
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv4.conf.default.rp_filter=0
|
||
|
|
ip netns exec "${nsname}" sysctl -wq net.ipv4.ip_forward=1
|
||
|
|
}
|
||
|
|
|
||
|
|
# Setup local SIDs for an SRv6 router
|
||
|
|
setup_rt_local_sids()
|
||
|
|
{
|
||
|
|
local rt="$1"
|
||
|
|
local rt_neighs="$2"
|
||
|
|
local net_prefix
|
||
|
|
local devname
|
||
|
|
local nsname
|
||
|
|
local neigh
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${rt}")"
|
||
|
|
|
||
|
|
for neigh in ${rt_neighs}; do
|
||
|
|
devname="veth-rt-${rt}-${neigh}"
|
||
|
|
|
||
|
|
net_prefix="$(get_network_prefix "${rt}" "${neigh}")"
|
||
|
|
|
||
|
|
# set underlay network routes for SIDs reachability
|
||
|
|
ip -netns "${nsname}" -6 route \
|
||
|
|
add "${VPN_LOCATOR_SERVICE}:${neigh}::/32" \
|
||
|
|
table "${LOCALSID_TABLE_ID}" \
|
||
|
|
via "${net_prefix}::${neigh}" dev "${devname}"
|
||
|
|
done
|
||
|
|
|
||
|
|
# Local End behavior (note that dev "${DUMMY_DEVNAME}" is a dummy
|
||
|
|
# interface)
|
||
|
|
ip -netns "${nsname}" -6 route \
|
||
|
|
add "${VPN_LOCATOR_SERVICE}:${rt}::${END_FUNC}" \
|
||
|
|
table "${LOCALSID_TABLE_ID}" \
|
||
|
|
encap seg6local action End dev "${DUMMY_DEVNAME}"
|
||
|
|
|
||
|
|
# all SIDs for VPNs start with a common locator. Routes and SRv6
|
||
|
|
# Endpoint behaviors instaces are grouped together in the 'localsid'
|
||
|
|
# table.
|
||
|
|
ip -netns "${nsname}" -6 rule add \
|
||
|
|
to "${VPN_LOCATOR_SERVICE}::/16" \
|
||
|
|
lookup "${LOCALSID_TABLE_ID}" prio 999
|
||
|
|
}
|
||
|
|
|
||
|
|
# build and install the SRv6 policy into the ingress SRv6 router.
|
||
|
|
# args:
|
||
|
|
# $1 - destination host (i.e. cafe::x host)
|
||
|
|
# $2 - SRv6 router configured for enforcing the SRv6 Policy
|
||
|
|
# $3 - SRv6 routers configured for steering traffic (End behaviors)
|
||
|
|
# $4 - SRv6 router configured for removing the SRv6 Policy (router connected
|
||
|
|
# to the destination host)
|
||
|
|
# $5 - encap mode (full or red)
|
||
|
|
# $6 - traffic type (IPv6 or IPv4)
|
||
|
|
__setup_rt_policy()
|
||
|
|
{
|
||
|
|
local dst="$1"
|
||
|
|
local encap_rt="$2"
|
||
|
|
local end_rts="$3"
|
||
|
|
local dec_rt="$4"
|
||
|
|
local mode="$5"
|
||
|
|
local traffic="$6"
|
||
|
|
local nsname
|
||
|
|
local policy=''
|
||
|
|
local n
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${encap_rt}")"
|
||
|
|
|
||
|
|
for n in ${end_rts}; do
|
||
|
|
policy="${policy}${VPN_LOCATOR_SERVICE}:${n}::${END_FUNC},"
|
||
|
|
done
|
||
|
|
|
||
|
|
policy="${policy}${VPN_LOCATOR_SERVICE}:${dec_rt}::${DX2_FUNC}"
|
||
|
|
|
||
|
|
# add SRv6 policy to incoming traffic sent by connected hosts
|
||
|
|
if [ "${traffic}" -eq 6 ]; then
|
||
|
|
ip -netns "${nsname}" -6 route \
|
||
|
|
add "${IPv6_HS_NETWORK}::${dst}" \
|
||
|
|
encap seg6 mode "${mode}" segs "${policy}" \
|
||
|
|
dev dum0
|
||
|
|
else
|
||
|
|
ip -netns "${nsname}" -4 route \
|
||
|
|
add "${IPv4_HS_NETWORK}.${dst}" \
|
||
|
|
encap seg6 mode "${mode}" segs "${policy}" \
|
||
|
|
dev dum0
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
# see __setup_rt_policy
|
||
|
|
setup_rt_policy_ipv6()
|
||
|
|
{
|
||
|
|
__setup_rt_policy "$1" "$2" "$3" "$4" "$5" 6
|
||
|
|
}
|
||
|
|
|
||
|
|
#see __setup_rt_policy
|
||
|
|
setup_rt_policy_ipv4()
|
||
|
|
{
|
||
|
|
__setup_rt_policy "$1" "$2" "$3" "$4" "$5" 4
|
||
|
|
}
|
||
|
|
|
||
|
|
setup_decap()
|
||
|
|
{
|
||
|
|
local rt="$1"
|
||
|
|
local nsname
|
||
|
|
|
||
|
|
nsname="$(get_rtname "${rt}")"
|
||
|
|
|
||
|
|
# Local End.DX2 behavior
|
||
|
|
ip -netns "${nsname}" -6 route \
|
||
|
|
add "${VPN_LOCATOR_SERVICE}:${rt}::${DX2_FUNC}" \
|
||
|
|
table "${LOCALSID_TABLE_ID}" \
|
||
|
|
encap seg6local action End.DX2 oif "${RT2HS_DEVNAME}" \
|
||
|
|
dev "${RT2HS_DEVNAME}"
|
||
|
|
}
|
||
|
|
|
||
|
|
setup_hs()
|
||
|
|
{
|
||
|
|
local hs="$1"
|
||
|
|
local rt="$2"
|
||
|
|
local hsname
|
||
|
|
local rtname
|
||
|
|
|
||
|
|
hsname="$(get_hsname "${hs}")"
|
||
|
|
rtname="$(get_rtname "${rt}")"
|
||
|
|
|
||
|
|
ip netns exec "${hsname}" sysctl -wq net.ipv6.conf.all.accept_dad=0
|
||
|
|
ip netns exec "${hsname}" sysctl -wq net.ipv6.conf.default.accept_dad=0
|
||
|
|
|
||
|
|
ip -netns "${hsname}" link add "${HS_VETH_NAME}" type veth \
|
||
|
|
peer name "${RT2HS_DEVNAME}" netns "${rtname}"
|
||
|
|
|
||
|
|
ip -netns "${hsname}" addr add "${IPv6_HS_NETWORK}::${hs}/64" \
|
||
|
|
dev "${HS_VETH_NAME}" nodad
|
||
|
|
ip -netns "${hsname}" addr add "${IPv4_HS_NETWORK}.${hs}/24" \
|
||
|
|
dev "${HS_VETH_NAME}"
|
||
|
|
|
||
|
|
ip -netns "${hsname}" link set "${HS_VETH_NAME}" up
|
||
|
|
ip -netns "${hsname}" link set lo up
|
||
|
|
|
||
|
|
ip -netns "${rtname}" addr add "${IPv6_HS_NETWORK}::254/64" \
|
||
|
|
dev "${RT2HS_DEVNAME}" nodad
|
||
|
|
ip -netns "${rtname}" addr \
|
||
|
|
add "${IPv4_HS_NETWORK}.254/24" dev "${RT2HS_DEVNAME}"
|
||
|
|
|
||
|
|
ip -netns "${rtname}" link set "${RT2HS_DEVNAME}" up
|
||
|
|
|
||
|
|
# disable the rp_filter otherwise the kernel gets confused about how
|
||
|
|
# to route decap ipv4 packets.
|
||
|
|
ip netns exec "${rtname}" \
|
||
|
|
sysctl -wq net.ipv4.conf."${RT2HS_DEVNAME}".rp_filter=0
|
||
|
|
}
|
||
|
|
|
||
|
|
# set an auto-generated mac address
|
||
|
|
# args:
|
||
|
|
# $1 - name of the node (e.g.: hs-1, rt-3, etc)
|
||
|
|
# $2 - id of the node (e.g.: 1 for hs-1, 3 for rt-3, etc)
|
||
|
|
# $3 - host part of the IPv6 network address
|
||
|
|
# $4 - name of the network interface to which the generated mac address must
|
||
|
|
# be set.
|
||
|
|
set_mac_address()
|
||
|
|
{
|
||
|
|
local nodename="$1"
|
||
|
|
local nodeid="$2"
|
||
|
|
local host="$3"
|
||
|
|
local ifname="$4"
|
||
|
|
local nsname
|
||
|
|
|
||
|
|
nsname=$(get_nodename "${nodename}")
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link set dev "${ifname}" down
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link set address "${MAC_PREFIX}:${nodeid}" \
|
||
|
|
dev "${ifname}"
|
||
|
|
|
||
|
|
# the IPv6 address must be set once again after the MAC address has
|
||
|
|
# been changed.
|
||
|
|
ip -netns "${nsname}" addr add "${IPv6_HS_NETWORK}::${host}/64" \
|
||
|
|
dev "${ifname}" nodad
|
||
|
|
|
||
|
|
ip -netns "${nsname}" link set dev "${ifname}" up
|
||
|
|
}
|
||
|
|
|
||
|
|
set_host_l2peer()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
local ipprefix="$3"
|
||
|
|
local proto="$4"
|
||
|
|
local hssrc_name
|
||
|
|
local ipaddr
|
||
|
|
|
||
|
|
hssrc_name="$(get_hsname "${hssrc}")"
|
||
|
|
|
||
|
|
if [ "${proto}" -eq 6 ]; then
|
||
|
|
ipaddr="${ipprefix}::${hsdst}"
|
||
|
|
else
|
||
|
|
ipaddr="${ipprefix}.${hsdst}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
ip -netns "${hssrc_name}" route add "${ipaddr}" dev "${HS_VETH_NAME}"
|
||
|
|
|
||
|
|
ip -netns "${hssrc_name}" neigh \
|
||
|
|
add "${ipaddr}" lladdr "${MAC_PREFIX}:${hsdst}" \
|
||
|
|
dev "${HS_VETH_NAME}"
|
||
|
|
}
|
||
|
|
|
||
|
|
# setup an SRv6 L2 VPN between host hs-x and hs-y (currently, the SRv6
|
||
|
|
# subsystem only supports L2 frames whose layer-3 is IPv4/IPv6).
|
||
|
|
# args:
|
||
|
|
# $1 - source host
|
||
|
|
# $2 - SRv6 routers configured for steering tunneled traffic
|
||
|
|
# $3 - destination host
|
||
|
|
setup_l2vpn()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local end_rts="$2"
|
||
|
|
local hsdst="$3"
|
||
|
|
local rtsrc="${hssrc}"
|
||
|
|
local rtdst="${hsdst}"
|
||
|
|
|
||
|
|
# set fixed mac for source node and the neigh MAC address
|
||
|
|
set_mac_address "hs-${hssrc}" "${hssrc}" "${hssrc}" "${HS_VETH_NAME}"
|
||
|
|
set_host_l2peer "${hssrc}" "${hsdst}" "${IPv6_HS_NETWORK}" 6
|
||
|
|
set_host_l2peer "${hssrc}" "${hsdst}" "${IPv4_HS_NETWORK}" 4
|
||
|
|
|
||
|
|
# we have to set the mac address of the veth-host (on ingress router)
|
||
|
|
# to the mac address of the remote peer (L2 VPN destination host).
|
||
|
|
# Otherwise, traffic coming from the source host is dropped at the
|
||
|
|
# ingress router.
|
||
|
|
set_mac_address "rt-${rtsrc}" "${hsdst}" 254 "${RT2HS_DEVNAME}"
|
||
|
|
|
||
|
|
# set the SRv6 Policies at the ingress router
|
||
|
|
setup_rt_policy_ipv6 "${hsdst}" "${rtsrc}" "${end_rts}" "${rtdst}" \
|
||
|
|
l2encap.red 6
|
||
|
|
setup_rt_policy_ipv4 "${hsdst}" "${rtsrc}" "${end_rts}" "${rtdst}" \
|
||
|
|
l2encap.red 4
|
||
|
|
|
||
|
|
# set the decap behavior
|
||
|
|
setup_decap "${rtsrc}"
|
||
|
|
}
|
||
|
|
|
||
|
|
setup()
|
||
|
|
{
|
||
|
|
local i
|
||
|
|
|
||
|
|
# create routers
|
||
|
|
ROUTERS="1 2 3 4"; readonly ROUTERS
|
||
|
|
for i in ${ROUTERS}; do
|
||
|
|
create_router "${i}"
|
||
|
|
done
|
||
|
|
|
||
|
|
# create hosts
|
||
|
|
HOSTS="1 2"; readonly HOSTS
|
||
|
|
for i in ${HOSTS}; do
|
||
|
|
create_host "${i}"
|
||
|
|
done
|
||
|
|
|
||
|
|
# set up the links for connecting routers
|
||
|
|
add_link_rt_pairs 1 "2 3 4"
|
||
|
|
add_link_rt_pairs 2 "3 4"
|
||
|
|
add_link_rt_pairs 3 "4"
|
||
|
|
|
||
|
|
# set up the basic connectivity of routers and routes required for
|
||
|
|
# reachability of SIDs.
|
||
|
|
setup_rt_networking 1 "2 3 4"
|
||
|
|
setup_rt_networking 2 "1 3 4"
|
||
|
|
setup_rt_networking 3 "1 2 4"
|
||
|
|
setup_rt_networking 4 "1 2 3"
|
||
|
|
|
||
|
|
# set up the hosts connected to routers
|
||
|
|
setup_hs 1 1
|
||
|
|
setup_hs 2 2
|
||
|
|
|
||
|
|
# set up default SRv6 Endpoints (i.e. SRv6 End and SRv6 End.DX2)
|
||
|
|
setup_rt_local_sids 1 "2 3 4"
|
||
|
|
setup_rt_local_sids 2 "1 3 4"
|
||
|
|
setup_rt_local_sids 3 "1 2 4"
|
||
|
|
setup_rt_local_sids 4 "1 2 3"
|
||
|
|
|
||
|
|
# create a L2 VPN between hs-1 and hs-2.
|
||
|
|
# NB: currently, H.L2Encap* enables tunneling of L2 frames whose
|
||
|
|
# layer-3 is IPv4/IPv6.
|
||
|
|
#
|
||
|
|
# the network path between hs-1 and hs-2 traverses several routers
|
||
|
|
# depending on the direction of traffic.
|
||
|
|
#
|
||
|
|
# Direction hs-1 -> hs-2 (H.L2Encaps.Red)
|
||
|
|
# - rt-2 (SRv6 End.DX2 behavior)
|
||
|
|
#
|
||
|
|
# Direction hs-2 -> hs-1 (H.L2Encaps.Red)
|
||
|
|
# - rt-4,rt-3 (SRv6 End behaviors)
|
||
|
|
# - rt-1 (SRv6 End.DX2 behavior)
|
||
|
|
setup_l2vpn 1 "" 2
|
||
|
|
setup_l2vpn 2 "4 3" 1
|
||
|
|
|
||
|
|
# testing environment was set up successfully
|
||
|
|
SETUP_ERR=0
|
||
|
|
}
|
||
|
|
|
||
|
|
check_rt_connectivity()
|
||
|
|
{
|
||
|
|
local rtsrc="$1"
|
||
|
|
local rtdst="$2"
|
||
|
|
local prefix
|
||
|
|
local rtsrc_nsname
|
||
|
|
|
||
|
|
rtsrc_nsname="$(get_rtname "${rtsrc}")"
|
||
|
|
|
||
|
|
prefix="$(get_network_prefix "${rtsrc}" "${rtdst}")"
|
||
|
|
|
||
|
|
ip netns exec "${rtsrc_nsname}" ping -c 1 -W "${PING_TIMEOUT_SEC}" \
|
||
|
|
"${prefix}::${rtdst}" >/dev/null 2>&1
|
||
|
|
}
|
||
|
|
|
||
|
|
check_and_log_rt_connectivity()
|
||
|
|
{
|
||
|
|
local rtsrc="$1"
|
||
|
|
local rtdst="$2"
|
||
|
|
|
||
|
|
check_rt_connectivity "${rtsrc}" "${rtdst}"
|
||
|
|
log_test $? 0 "Routers connectivity: rt-${rtsrc} -> rt-${rtdst}"
|
||
|
|
}
|
||
|
|
|
||
|
|
check_hs_ipv6_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
local hssrc_nsname
|
||
|
|
|
||
|
|
hssrc_nsname="$(get_hsname "${hssrc}")"
|
||
|
|
|
||
|
|
ip netns exec "${hssrc_nsname}" ping -c 1 -W "${PING_TIMEOUT_SEC}" \
|
||
|
|
"${IPv6_HS_NETWORK}::${hsdst}" >/dev/null 2>&1
|
||
|
|
}
|
||
|
|
|
||
|
|
check_hs_ipv4_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
local hssrc_nsname
|
||
|
|
|
||
|
|
hssrc_nsname="$(get_hsname "${hssrc}")"
|
||
|
|
|
||
|
|
ip netns exec "${hssrc_nsname}" ping -c 1 -W "${PING_TIMEOUT_SEC}" \
|
||
|
|
"${IPv4_HS_NETWORK}.${hsdst}" >/dev/null 2>&1
|
||
|
|
}
|
||
|
|
|
||
|
|
check_and_log_hs2gw_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
|
||
|
|
check_hs_ipv6_connectivity "${hssrc}" 254
|
||
|
|
log_test $? 0 "IPv6 Hosts connectivity: hs-${hssrc} -> gw"
|
||
|
|
|
||
|
|
check_hs_ipv4_connectivity "${hssrc}" 254
|
||
|
|
log_test $? 0 "IPv4 Hosts connectivity: hs-${hssrc} -> gw"
|
||
|
|
}
|
||
|
|
|
||
|
|
check_and_log_hs_ipv6_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
|
||
|
|
check_hs_ipv6_connectivity "${hssrc}" "${hsdst}"
|
||
|
|
log_test $? 0 "IPv6 Hosts connectivity: hs-${hssrc} -> hs-${hsdst}"
|
||
|
|
}
|
||
|
|
|
||
|
|
check_and_log_hs_ipv4_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
|
||
|
|
check_hs_ipv4_connectivity "${hssrc}" "${hsdst}"
|
||
|
|
log_test $? 0 "IPv4 Hosts connectivity: hs-${hssrc} -> hs-${hsdst}"
|
||
|
|
}
|
||
|
|
|
||
|
|
check_and_log_hs_connectivity()
|
||
|
|
{
|
||
|
|
local hssrc="$1"
|
||
|
|
local hsdst="$2"
|
||
|
|
|
||
|
|
check_and_log_hs_ipv4_connectivity "${hssrc}" "${hsdst}"
|
||
|
|
check_and_log_hs_ipv6_connectivity "${hssrc}" "${hsdst}"
|
||
|
|
}
|
||
|
|
|
||
|
|
router_tests()
|
||
|
|
{
|
||
|
|
local i
|
||
|
|
local j
|
||
|
|
|
||
|
|
log_section "IPv6 routers connectivity test"
|
||
|
|
|
||
|
|
for i in ${ROUTERS}; do
|
||
|
|
for j in ${ROUTERS}; do
|
||
|
|
if [ "${i}" -eq "${j}" ]; then
|
||
|
|
continue
|
||
|
|
fi
|
||
|
|
|
||
|
|
check_and_log_rt_connectivity "${i}" "${j}"
|
||
|
|
done
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
host2gateway_tests()
|
||
|
|
{
|
||
|
|
local hs
|
||
|
|
|
||
|
|
log_section "IPv4/IPv6 connectivity test among hosts and gateways"
|
||
|
|
|
||
|
|
for hs in ${HOSTS}; do
|
||
|
|
check_and_log_hs2gw_connectivity "${hs}"
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
host_vpn_tests()
|
||
|
|
{
|
||
|
|
log_section "SRv6 L2 VPN connectivity test hosts (h1 <-> h2)"
|
||
|
|
|
||
|
|
check_and_log_hs_connectivity 1 2
|
||
|
|
check_and_log_hs_connectivity 2 1
|
||
|
|
}
|
||
|
|
|
||
|
|
test_dummy_dev_or_ksft_skip()
|
||
|
|
{
|
||
|
|
local test_netns
|
||
|
|
|
||
|
|
test_netns="dummy-$(mktemp -u XXXXXXXX)"
|
||
|
|
|
||
|
|
if ! ip netns add "${test_netns}"; then
|
||
|
|
echo "SKIP: Cannot set up netns for testing dummy dev support"
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
modprobe dummy &>/dev/null || true
|
||
|
|
if ! ip -netns "${test_netns}" link \
|
||
|
|
add "${DUMMY_DEVNAME}" type dummy; then
|
||
|
|
echo "SKIP: dummy dev not supported"
|
||
|
|
|
||
|
|
ip netns del "${test_netns}"
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
ip netns del "${test_netns}"
|
||
|
|
}
|
||
|
|
|
||
|
|
test_iproute2_supp_or_ksft_skip()
|
||
|
|
{
|
||
|
|
if ! ip route help 2>&1 | grep -qo "l2encap.red"; then
|
||
|
|
echo "SKIP: Missing SRv6 l2encap.red support in iproute2"
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
if [ "$(id -u)" -ne 0 ]; then
|
||
|
|
echo "SKIP: Need root privileges"
|
||
|
|
exit "${ksft_skip}"
|
||
|
|
fi
|
||
|
|
|
||
|
|
# required programs to carry out this selftest
|
||
|
|
test_command_or_ksft_skip ip
|
||
|
|
test_command_or_ksft_skip ping
|
||
|
|
test_command_or_ksft_skip sysctl
|
||
|
|
test_command_or_ksft_skip grep
|
||
|
|
|
||
|
|
test_iproute2_supp_or_ksft_skip
|
||
|
|
test_dummy_dev_or_ksft_skip
|
||
|
|
|
||
|
|
set -e
|
||
|
|
trap cleanup EXIT
|
||
|
|
|
||
|
|
setup
|
||
|
|
set +e
|
||
|
|
|
||
|
|
router_tests
|
||
|
|
host2gateway_tests
|
||
|
|
host_vpn_tests
|
||
|
|
|
||
|
|
print_log_test_results
|