2 # SPDX-License-Identifier: GPL-2.0
4 rndh=$(printf %x $sec)-$(mktemp -u XXXXXX)
11 timeout_test=$((timeout_poll * 2 + 1))
18 echo "Usage: $0 [ -b ] [ -c ] [ -d ]"
19 echo -e "\t-b: bail out after first error, otherwise runs al testcases"
20 echo -e "\t-c: capture packets for each test using tcpdump (default: no capture)"
21 echo -e "\t-d: debug this script"
27 rm -f "$large" "$small"
31 for netns in "$ns1" "$ns2" "$ns3";do
36 ip -Version > /dev/null 2>&1
38 echo "SKIP: Could not run test without ip tool"
43 # ns1eth1 ns2eth1 ns2eth3 ns3eth1
55 size=$((2 * 2048 * 4096))
57 dd if=/dev/zero of=$small bs=4096 count=20 >/dev/null 2>&1
58 dd if=/dev/zero of=$large bs=4096 count=$((size / 4096)) >/dev/null 2>&1
62 for i in "$ns1" "$ns2" "$ns3";do
63 ip netns add $i || exit $ksft_skip
64 ip -net $i link set lo up
65 ip netns exec $i sysctl -q net.ipv4.conf.all.rp_filter=0
66 ip netns exec $i sysctl -q net.ipv4.conf.default.rp_filter=0
69 ip link add ns1eth1 netns "$ns1" type veth peer name ns2eth1 netns "$ns2"
70 ip link add ns1eth2 netns "$ns1" type veth peer name ns2eth2 netns "$ns2"
71 ip link add ns2eth3 netns "$ns2" type veth peer name ns3eth1 netns "$ns3"
73 ip -net "$ns1" addr add 10.0.1.1/24 dev ns1eth1
74 ip -net "$ns1" addr add dead:beef:1::1/64 dev ns1eth1 nodad
75 ip -net "$ns1" link set ns1eth1 up mtu 1500
76 ip -net "$ns1" route add default via 10.0.1.2
77 ip -net "$ns1" route add default via dead:beef:1::2
79 ip -net "$ns1" addr add 10.0.2.1/24 dev ns1eth2
80 ip -net "$ns1" addr add dead:beef:2::1/64 dev ns1eth2 nodad
81 ip -net "$ns1" link set ns1eth2 up mtu 1500
82 ip -net "$ns1" route add default via 10.0.2.2 metric 101
83 ip -net "$ns1" route add default via dead:beef:2::2 metric 101
85 ip netns exec "$ns1" ./pm_nl_ctl limits 1 1
86 ip netns exec "$ns1" ./pm_nl_ctl add 10.0.2.1 dev ns1eth2 flags subflow
88 ip -net "$ns2" addr add 10.0.1.2/24 dev ns2eth1
89 ip -net "$ns2" addr add dead:beef:1::2/64 dev ns2eth1 nodad
90 ip -net "$ns2" link set ns2eth1 up mtu 1500
92 ip -net "$ns2" addr add 10.0.2.2/24 dev ns2eth2
93 ip -net "$ns2" addr add dead:beef:2::2/64 dev ns2eth2 nodad
94 ip -net "$ns2" link set ns2eth2 up mtu 1500
96 ip -net "$ns2" addr add 10.0.3.2/24 dev ns2eth3
97 ip -net "$ns2" addr add dead:beef:3::2/64 dev ns2eth3 nodad
98 ip -net "$ns2" link set ns2eth3 up mtu 1500
99 ip netns exec "$ns2" sysctl -q net.ipv4.ip_forward=1
100 ip netns exec "$ns2" sysctl -q net.ipv6.conf.all.forwarding=1
102 ip -net "$ns3" addr add 10.0.3.3/24 dev ns3eth1
103 ip -net "$ns3" addr add dead:beef:3::3/64 dev ns3eth1 nodad
104 ip -net "$ns3" link set ns3eth1 up mtu 1500
105 ip -net "$ns3" route add default via 10.0.3.2
106 ip -net "$ns3" route add default via dead:beef:3::2
108 ip netns exec "$ns3" ./pm_nl_ctl limits 1 1
110 # debug build can slow down measurably the test program
111 # we use quite tight time limit on the run-time, to ensure
113 # Use kmemleak/lockdep/kasan/prove_locking presence as a rough
114 # estimate for this being a debug kernel and increase the
115 # maximum run-time accordingly. Observed run times for CI builds
116 # running selftests, including kbuild, were used to determine the
117 # amount of time to add.
118 grep -q ' kmemleak_init$\| lockdep_init$\| kasan_init$\| prove_locking$' /proc/kallsyms && slack=$((slack+550))
122 wait_local_port_listen()
124 local listener_ns="${1}"
129 port_hex="$(printf "%04X" "${port}")"
130 for i in $(seq 10); do
131 ip netns exec "${listener_ns}" cat /proc/net/tcp* | \
132 awk "BEGIN {rc=1} {if (\$2 ~ /:${port_hex}\$/ && \$4 ~ /0A/) {rc=0; exit}} END {exit rc}" &&
144 port=$((10000+$test_cnt))
145 test_cnt=$((test_cnt+1))
152 addr_port=$(printf "%s:%d" ${connect_addr} ${port})
156 if [ -z $SUDO_USER ] ; then
159 capuser="-Z $SUDO_USER"
162 local capfile="${rndh}-${port}"
163 local capopt="-i any -s 65535 -B 32768 ${capuser}"
165 ip netns exec ${ns3} tcpdump ${capopt} -w "${capfile}-listener.pcap" >> "${capout}" 2>&1 &
166 local cappid_listener=$!
168 ip netns exec ${ns1} tcpdump ${capopt} -w "${capfile}-connector.pcap" >> "${capout}" 2>&1 &
169 local cappid_connector=$!
174 timeout ${timeout_test} \
175 ip netns exec ${ns3} \
176 ./mptcp_connect -jt ${timeout_poll} -l -p $port -T $time \
177 0.0.0.0 < "$sin" > "$sout" &
180 wait_local_port_listen "${ns3}" "${port}"
182 timeout ${timeout_test} \
183 ip netns exec ${ns1} \
184 ./mptcp_connect -jt ${timeout_poll} -p $port -T $time \
185 10.0.3.3 < "$cin" > "$cout" &
195 kill ${cappid_listener}
196 kill ${cappid_connector}
199 cmp $sin $cout > /dev/null 2>&1
201 cmp $cin $sout > /dev/null 2>&1
204 printf "%-16s" " max $max_time "
205 if [ $retc -eq 0 ] && [ $rets -eq 0 ] && \
206 [ $cmpc -eq 0 ] && [ $cmps -eq 0 ]; then
213 echo "client exit code $retc, server $rets" 1>&2
214 echo -e "\nnetns ${ns3} socket stat for $port:" 1>&2
215 ip netns exec ${ns3} ss -nita 1>&2 -o "sport = :$port"
216 echo -e "\nnetns ${ns1} socket stat for $port:" 1>&2
217 ip netns exec ${ns1} ss -nita 1>&2 -o "dport = :$port"
236 [ $delay1 -gt 0 ] && delay1="delay $delay1" || delay1=""
237 [ $delay2 -gt 0 ] && delay2="delay $delay2" || delay2=""
239 for dev in ns1eth1 ns1eth2; do
240 tc -n $ns1 qdisc del dev $dev root >/dev/null 2>&1
242 for dev in ns2eth1 ns2eth2; do
243 tc -n $ns2 qdisc del dev $dev root >/dev/null 2>&1
245 tc -n $ns1 qdisc add dev ns1eth1 root netem rate ${rate1}mbit $delay1
246 tc -n $ns1 qdisc add dev ns1eth2 root netem rate ${rate2}mbit $delay2
247 tc -n $ns2 qdisc add dev ns2eth1 root netem rate ${rate1}mbit $delay1
248 tc -n $ns2 qdisc add dev ns2eth2 root netem rate ${rate2}mbit $delay2
250 # time is measured in ms, account for transfer size, affegated link speed
251 # and header overhead (10%)
252 local time=$((size * 8 * 1000 * 10 / (( $rate1 + $rate2) * 1024 *1024 * 9) ))
254 # mptcp_connect will do some sleeps to allow the mp_join handshake
255 # completion (see mptcp_connect): 200ms on each side, add some slack
256 time=$((time + 400 + slack))
258 printf "%-60s" "$msg"
259 do_transfer $small $large $time
261 if [ $lret -ne 0 ]; then
263 [ $bail -eq 0 ] || exit $ret
266 printf "%-60s" "$msg - reverse direction"
267 do_transfer $large $small $time
269 if [ $lret -ne 0 ]; then
271 [ $bail -eq 0 ] || exit $ret
275 while getopts "bcdh" option;do
298 run_test 10 10 0 0 "balanced bwidth"
299 run_test 10 10 1 50 "balanced bwidth with unbalanced delay"
301 # we still need some additional infrastructure to pass the following test-cases
302 run_test 30 10 0 0 "unbalanced bwidth"
303 run_test 30 10 1 50 "unbalanced bwidth with unbalanced delay"
304 run_test 30 10 50 1 "unbalanced bwidth with opposed, unbalanced delay"